THE /f 1 «Vft/\C^^\ZINE FOR 


4VTARI COfVli>UTER OV\/ISIERS 


^ 


^ 

^»^^& 


^ 




c] 


r ' 


' 


^^^^Rg 




^ 


^^0 M 


P 


U T 1 N G 



NOVEMBER 1988 ISSUE 66 



L^P 



DISK VERSION $12.95 

• POPS: 
Stereo Sound 
for Your Atari 



• Boot Canuumd 
\ Game 




^ Nimral'svmce— The Rtivlmte Conti 




II 




You can save time, and save a lot of money by subscribing to 

A.N.A.L.O.G. Computing Magazine. Save $14 off the cover 

price with the convenience of having A.N.A.L.O.G. dehvered directly 

to your door before it even hits the newsstands. To order use the 

handy postage-paid order card located in the back of this magazine! 



1 YEAR FOR ONLY $28 

SAVE $14 OFF THE COVER PRICE 

1 YEAR WITH DISK ONLY $79 





±13L\ 




This month's editorial comes to you from 
high up (about 37,000 feet) in the friendly 
skies, as I jot down some thoughts about what 
it's been Mice for the past few months, com- 
muting from my home in Massachusetts to 
analog's new offices in Los Angeles. Be- 
lieve me, it hasn't been easy. 

No sooner have I set foot at Logan Inter- 
national Airport in Boston than it seems I 
have to turn around and make another bee- 
line for the West Coast, banging out a story 
or an editorial on my laptop en route to meet- 
ing publishing deadlines in the City of 
Angels. 

The wear and tear of rushing from coast 
to coast is taking its toll: I've acquired a hag- 
gard, desperate look from not getting enough 
sleep; my body suffers from terminal jet lag; 
my fianc^ barely recognizes me ("Lee 
who?") and a sense of cultural schizophre- 
nia has taken root due to the extreme polari- 
ties of the laid-back Southern California 
lifestyle and the East Coast grind. I no longer 
know whether to order sushi or clam 
chowder! 

So I've made a decision. In order not to 
bum out before my time ("Publishing Tycoon 
Commits Hara-Kiri") and to be able to pro- 
vide the kind of editorial guidance ANALOG 
needs to maintain the high standards we've 
worked so hard to reach, I'm heeding the 
words of Horace Greeley to "Go west." From 
now on, I'll make my home where the sun 
shines all year-round, where snow and sub- 
zero temperatures are only a memory. Instead 
of Boston Common, I'll roam Griffith Park. 
Instead of catching the Sox at Fenway, I'll 
down my foot-long hot dogs at Dodger Stadi- 
um (but still root for Wade Boggs and com- 
pany). In place of the rocky Massachusetts 
coastline and chilly waters of the Atlantic, I'll 
sink my feet into Venice Beach's sandy shores 
and bodysurf in the moderate Pacific. 

And so, like the Clampetts, I'm loading up 
my truck and moving to Beverly. Hills, that 
is. Swimming pools. Movie stars. . . .Well, 
maybe it's not all it's cracked up to be. I'll 
have to battle gridlocked freeways, out-of- 
control smog and the occasional earthquake. 
But that's a small price to pay to liberate my- 
self from the red-eye express, bad airline food 
and in-flight movies. Massachusetts, it's been 
great, but so long. California, here I come! 

bi Lee Pappas 
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n cold? 



I am writing this letter because my machine 
was recently infected with a virus. The 
damage resulting from the infection took 
three months to repair. The symptoms start- 
ed when I was unable to write to the disks 
because they were reported as full by the 
operating system. This didn't seem logical 
since some of the disks had small data files 
on them which should not have caused a full- 
disk message to appear. I started using the 
backup disks, but they also became infected 
and thus damaged beyond repair. After weeks 
of trial and error, neither I nor my friends 
were able to discover what caused the 
problem. As a result of helping me, my 
friend's system also became infected via disks 
used on my system. How far the virus spread 
beyond my immediate group is problematic. 

I frequently read your magazine and have 
not seen any articles forewarning your read- 
ers of software viruses. I eventually read a 
Newsweek magazine article which described 
the problem as a software virus. It was as- 
tounding to find the virus problem being dis- 
cussed in a periodical which is dedicated to 
general news events, especially when the two 
computer magazines I read did not mention 
them. Since the Newsweek article, I have read 
articles in both the Washington Post and Time. 
By the way, the Post dedicated all of page 3 
in the Sunday edition to the growing problem. 

I think it is your responsibility to keep your 
readers informed about computer problems 
which could result in months of work being 
lost. The damage just to my system could buy 
a subscription to ten computer magazines for 
the next five years. 

It is certain that many of your readers are 
as ignorant of the problem as I was. It is also 
evident that the problem is large enough to 
draw national media coverage. It would be 
a disservice to your readers not to give them 
information about this problem. Therefore I 
request that you keep your readers informed 



symptoms and cures. 
-Ralph Allen 
Arlington, Virginia 




Is there any way an Action! compiled pro- 
gram could be converted to BASIC data state- 
ments and printed in your magazine? This 
would allow more of us Action!-less owners 
to enjoy some of those fine programs. I real- 
ize they are available on your disk version. 
—Everett Rantanen 
Milwaukee, Wisconsin 

Any binary file may be converted to DATA 
statements for use in a BASIC loader or for 
typing in by M/L Editor However, most Ac- 
tion! programs, after they've been compiled, 
are much too large to allow their printing in 
the magazine. We realize that many readers 
don 't have Action!, but we feel that enough 
people are interested in the language to war- 
rant the inclusion of an Action! program now 
and then. As you mentioned, most of the Ac- 
tion! programs (not all of them) are availa- 
ble on the disk version of the magazine. Also, 
they may be downloaded from ANALOG 's 
Atari SIG on DELPHI. 
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I am Polish, and I am 17 years old. I have 
an Atari 800XL computer and a 1050 disk 
drive. I want to collaborate with other Atari 
users. I also want to exchange Atari computer 
magazines. Can you help me? 

— Artur Nowakowski 

W. Wasilewskiej 5/8 

08-110 Siedlce 

Poland 



Updating th 
GEnic update 



There's a problem with Andy Eddy's piece 
on GEnie. I am not the SYSOP. I am one of 
the SYSOPs. To make it very clear: 

There are two contracts for the Atari round- 
tables (RTs). Darlah holds one, and Atari 
Corp. holds the other. On Atari's behalf, I 
am the manager of the Atari areas, with 20 
members of Atari's staff currently online 



there. Darlah, however, supervises all the ac- 
tivities of the assistant SYSOPs (Marty Al- 
bert, Mark Booth, Sandy Wilson, Holly 
Stowe, Craig Thorn and Atarians John Town- 
send and Dan Scott). 

Darlah works harder for the GEnie RTs 
than any SYSOP I've ever seen. She deserves 
credit, and listing me as SYSOP is not fair. 
I hope you can put something in a future is- 
sue to fix this. Thanks. —Neil Harris 

Atari Corp. 

/ will be the first to acknowledge the work 
that Darlah has done to make the Atari RTs 
what they are. Her contributions are every- 
where. What I meant to say in the article was 
that you had taken over the management of 
the Atari RTs, but it didn't come out that 
way. . .the sun reflected off my monitor. . .1 
tripped on a deadline. My apologies to 
Darlah and her associates. —Andy Eddy 
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The following lines were accidentally delet- 
ed from the end of Listing 2 of Issue 63 's 
Train Crazy. Sorry about that. 



JI 4007 FOR T=2 TO 17 : g=U+128 : FOR 0=8 TO 

8:NEKT 0;SOUND l,g,8,6:P0SITI0N T,l:? 

MB;" HUe[3";NEXT T;P05ITI0N 17,1 
JX 4008 ? ae;" ":po5ITION 14,o:? as;" 

HgeH" 
NB 4010 POKE 5S9,42:P05ITI0N 7,0:? a5;"Hfl 

K3 BueH ":? a6;"":50UND i,o,o,o 
AH 4030 ? ae;" sIERe ";5C+zi5:? a5;" 

FK 4040 ? as;" Pr[^5 giflrO":? as;"" 

ow 4045 ? ae;" OUR a NeE caC 

":P0KE 559,42;G0SUB 4050 
ZK 4047 FOR YY=1 TO 15;P0SITI0N 6,4:? a6; 

" ":F0R T=1 TO 30:IF PEEKIS3 

2791=5 THEN RUM 
PL 4048 NEXT T:P05ITI0N 6,4:? n6;"Pr[B5 S 

OflrB":FOR T=l TO 30:IF PEEK C53279)=6 T 

HEN RUN 
RY 4049 NEXT T:NEXT YV:RUN 
GZ 4050 IF 5O15000 T HEN POSITION 4,8:? a 

6 ; "[SGHinijniBHiES" : RETURN 

JW 4051 IF SOlOOOO THEN POSITION 6 

6;"GREflT SCORE";RETURN 
GT 40 52 IF 5O4 B00 THEN POSITION 7,8:? a6 

; ■ 'PHiiaHIIp' ■ ; R E T u R N 

PR 4053 IF SC<4000 THEN POSITION 7,8:? a6 

;"try again" :RETURN 

LQ 5008 PMJ(P1+Y,P1+Y+193=P$ tl,l+19) 

XK 5001 I=58:X=X-2.4:S=STICK tOl 

PG 5082 IF PEEK t53253J>0 THEN IBOOO 

XT 5083 IF 5=14 OR S=13 THEN 422 

JF 5084 IF STRIGC8)=0 THEN X=X+1:G0T0 455 

FS 5010 POKE 53249, X:IF X<S3 THEN GOTO 38 

00 
OT 5038 GOTO 5000 
KG 9000 IF PEEKtS32S33=2 THEN SC=SC+208:G 

OTO 9002 
OF 9081 GOTO 620 
UM 9002 RESTORE 9004tLP : READ 0:POKE DM+2S 

6*1+0, 0:SOUND 1,50,10,8:IF LP=4 THEN C 

X=-8:Bfl=6 
RT 9803 IF LP=5 THEN CX=-8:Bfl=6 
GT 9804 DATa 20 
LH 9885 DATA 58 
NG 9886 DATA 97 
HR 9887 DATA 133 
L5 9888 DATA 168 
IN 9889 DATA 206 

YF 9010 POSITION CX+LP+LP, BA : ? "Z" 
DM 9011 I=3jV£l20:ZX=ZK+3: POSITION 38-TT+ 

ZX,2:? "[3aj!":0=8:F0R Z=Y TO 37 STEP 2: 

U=y+1B:S0UND 1,U,18,5 
YY 9020 PMSCPl+Z,Pl+Z+19)=PStI,I+19) :NEXT 

Z;l=58 
ON 9825 PMStPl+34,Pl+53J=P$tI,I+19J :Y=34: 

G8T0 421 
ZZ 18008 IF PEEKCS32S33=8 AND LP=5 THEN 9 

08 
GC 18001 IF PEEKt53Z53J>0 THEN 9000 
ZY 20088 a=Q+37:P0KE DM+255«3+Q+2, : POKE 

DM+256»3+Q+l,0:LP=LP+l: 0=0: GOTO 421 
GL 30080 RUN 
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Anyone call a 
doctor? 



Mad Scientist Software produces medical 
eduction software to teach medical principles 
to students and hospital staff. Their latest 
offering is the Advanced Cardiac Life Sup- 
port (ACLS) package. A four-dislc series, the 
ACLS system covers EKG training, cardiac 
arrest simulations, ACLS terminology and 
protocols, and a general quiz to prepare stu- 
dents for the ACLS certification test. The 
ACLS package costs only $109 and is now 
available for the XE/XL. 

Mad Scientist Software 
2063 North 820 West 
Pleasant Grove, UT 84062 
(801) 785-3028 

Stripless XE/XL 

Recently Artworx Software released Strip 
Poker II for the Atari ST, Apple IIGS and 
IBM-PC. You might remember Strip Poker 
as a fun and inventive game where your com- 
puter opponent reveals more than just his/her 
hand of poker cards. Artworx seems to have 
chosen to not produce an XE/XL version of 
this quality product. ANALOG encourages 
its readers to write to Artworx to change their 
mind about the Atari 8- bit market. 

Artworx Software 
1844 Penfield Road 
Penfield, NY 14526 
(800) 828-6573 



AL/65 

development 

tools 

Omega Soft has announced a new develop- 
ment system for the 8-bit Atari home com- 
puter. Unlike most assemblers, AL/65 
compiles 6502 source code into relocatable 
code, or code which can be used in other pro- 
grams. The editor supports full-screen edit- 
ing, macros and custom character sets. 

AL/65 is a complete development system 
for only $44.95. The package includes an as- 
sembler, linker, editor and system utility soft- 
ware. AL/65 also comes with a 
command-line interpreter (CLI), which al- 
lows developers to use typed commands to 
maintain files, launch programs and modify 
the development environment. 

Omega Soft 
P.O. Box 139 
Harrelis, NC 28444 
(919) 532-2359 

Mindscape 
signs SSI 

In a move to increase its audience, Mind- 
scape has signed an exclusive publishing 
agreement with Strategic Simulations Inc. 
(SSI). The agreement gives Mindscape rights 
to publish SSI's backlist of strategy/simula- 
tion titles. Well-known classics like Fortress, 
Battalion Commander, Nam and Geopoli- 
tique 1990 are the first SSI programs to be 
published under the new Thunder Mountain 
label. 



SSI started in the computer war-game mar- 
ket in 1980, and has held almost half of the 
war-game market since. Mindscape has also 
licensed Cartel and Cutthroats, Combat 
Leader, Galactic Gladiators and Queen of 
Hearts. Most of these titles will be available 
for the Atari 8-bits. 

Mindscape 
3444 Dundee Road 
Northbrook, IL 60062 
(312) 480-7667 

Daisy-Dot II 

Roy Goldman has created Daisy-Dot II, a 
powerful printing system for 8-bit Atari com- 
puters. The software package allows printing 
of near-letter-quality text with Epson and Star 
compatible printers. Based on the original 
Daisy Dot, the new system offers higher out- 
put quality and new formatting features. 
Fourteen fonts are included with Daisy-Dot 
II, including Roman2 (Times Roman), Ohio 
(Geneva), Senator (Helvetica), and Block2 
(Modern). 

Daisy-Dot II has been put into the public 
domain; the entire system can be found on 
DELPHI, GEnie and CompuServe. The 
double-sided disk and 24-page manual may 
be purchased from Roy Goldman for only 
$10. 

The Daisy-Dot II Accessory Disk is also 
available and is priced at only $5. It comes 
with TextPro, a word processor for text en- 
try, eight additional fonts and a utility pro- 
gram that allows Daisy-Dot II to work with 
the AtariWriter. 

Roy Goldman 
2440 South Jasmine 
Denver, CO 80222 



Branch 

Software 

sprouts new 

titles 



BUY-SELL.TRADE 



A new company is producing low-cost, 
high-quality software for the 8-bit market. 
Branch Software has released several new ti- 
tles, all designed to work on any 48K Atari 
8-bit computer with DOS 2.0 or 2.5 installed. 

In Blockaid you use your shield to defend 
yourself against the fiery ball of Zieweunthu. 
After learning how to pronounce Zieweun- 
thu, you can destroy all the colorful blocks 
and advance into the next of 40 rooms. The 
game includes a Blockaid Construction Set, 
so you can custom design additional screens. 
The game even lets you insert your custom 
screens into the Blockaid game for future 
generations to enjoy. 

Trivia Quiz is the improved version of the 
public-domain trivia game of the same name. 



BUY.SELL-TRADE 



The new version is filled with ready-to-use 
questions, with more companion data disks 
on their way. 

In Agent 16, a role-playing game, three gi- 
ant text adventures are stored on one disk. 
The central character, Agent 16, is a super- 
secret spy that tumbles from one deadly 
challenge to another. A special menu loader 
lets you see all the instructions and back- 
ground information needed to play Agent 16. 

All of the new titles are currently availa- 
ble and have a list price of less than $20. 

Branch Software 

2750 Friday Lane 

Cocoa, FL 32926 

(407) 631-7149 fl 



BUY-SELL-TRADE 



Computer Repeats^ Inc. 



UNBELIEVABLE DEALS EVERYDAY! 



ALL ORDERS PROCESSED IN 24 HRS! 



Atari io40ST 




$449 



NEW 

iKith trade-in of 130XE, 1050, 1702 Mon., NP-10 Printer, moden 
$CALL for your system 



Atari 520ST fm 




$219 



with trade-in of 800XL 1050, 1702, NP-10 Printer, 1200 mdm. 
$CALL for your system 



All references to trade-ins assume equipment lo be in good 
working condilion. Shippinahandllng will be added to all 
prices. No additional cliarge for credit cards or COO. Mailorder 
prices shown. 

WE CHECK FOR CREDIT CARD THEFT! 



Products - Used 

520ST Computer $335 1 040ST Computer $585 

SF354 Drive $99 130XE Computer $119 

1200XL Computer $59 BOOXL Computer $69 

400-16K Computer $29 Hayes Smartmodem $49 

1050 Drive $139 Atari 1027 LQ Printer $79 

Atari 1025 Printer $79 Okimate 10 w/PIP $99 

ATR-8000 64K, Slaves $1 99 Slave Drives from $35 

Atari 850 Interface $69 Commodore 1702 $135 

Koala Touch Tablet $35 Software/Books from $1 

Products - New 

520STFMCPU $499 520 ST FM color sys$819 

512K RArflFMInstlld $199 Atari SF31 4 Drive $219 

SMI 24 mono Monitor $159 SCI 224 color Mon. $325 



Atari 130XE 




with trade-in of 800XL, 1050 Drive 
$CALL for your system 



130XE Computer $249 
1B02C Color Monitor $189 
Avatex 1200HC $99 

Atari SX21 2 Modem $89 
256K upgrades Ok from$35 
StarNX-1000144cps $189 



XF-551 Drive $179 

Magnavox 80 Mono $99 
Avatex 2400HC $199 

Happy Rev. 7.1 $99 

H-Time 8 Cartridge $49 
Star NX-2400 24 Pin $389 



$Casti for your equipnnent 

Tfiousands of software & bool< titles 

Plus, MUCH, MUCH I^ORE! 

2017 13th Street Suite A 
Boulder, CO 80302 



Atari XF-551 



N 



$109 



witti trade-in of 1050 Drive 
$CALL for your system 



1-303-939-8144 C- 



24 HR Modem Software Quotes: 1-303-939-8174 



Authorized Dealers for 
C( 'AMIGA 

' Computers and Accessories. 



A 



VISA MASTERCARD DISCOVER AMERICAN EXPRESS COD 



CIRCLE #102 ON READER SERVICE CARD. 
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Atari Streamers is a machine- 
language utility which uses 
player-missile graphics to cre- 
ate fine-scrolling vertical- 
character displays. Excluding 
inverse characters (which are automatically 
unshifted), displays can be made up of any 
string of characters desired— that is, upper- 
case, lowercase and graphics characters in 
either single- or double-line resolution. 
Even custom-character sets can be dis- 
played. 

Atari Streamers has two entry points. 
The first entry point copies your string of 
characters into player-missile memory. It 
is called by the USR statement: 

X=USR(1536,PMADDRESS, 

STR 1 NGADDRESS , FONT .LENGTH) . 

PMADDRESS is the address of the play- 
er you wish to put your character display 
in. STRINGADDRESS is the address of 
the string of characters that will be copied 
to player memory. The best way to store 
your character display is to define it as a 
string variable, and then use the ADR func- 
tion to find its address. FONT is the ad- 
dress of the character set you wish to use. 
It should be set to 57344,which is the ROM 
address for the normal character set,but if 
you have an altered character set in 



memory, or if you wish to use the interna- 
tional character set (found only on the XL 
and XE computers), simply substitute the 
address of the character set you wish to dis- 
play. The international character set is lo- 
cated at 52224. The last value, LENGTH, 
is the length of your string of characters. 
In double-line resolution, strings can be a 
maximum of 16 characters long. In single- 
line resolution, strings can be up to 32 
characters long. 



Excluding inverse 
characters^ displays 
can be made up of 

any string of 
characters desired. 



The second entry point of the routine will 
move everything in the player specified one 
byte up or one byte down with wrap- 
around. It is called by the USR statement: 

X=USR(1677,PMADDRESS,DIRECTI0N) 



PMADDRESS is the address of the play- 
er you wish to move. DIRECTION is the 
direction you wish to move the player in. 
If DIRECTION equals zero, everything in 
the player will be moved up by one. If 
DIRECTION equals one, everything in the 
player will be moved down by one. When 
this routine is used in combination with the 
horizontal-position registers, you can eas- 
ily move your character displays anywhere 
on screen and over any graphics mode. 

The demo program displays and moves 
all four players in double-line resolution (if 
you wish to change the demo program to 
display in single-line resolution, substitute 
the lines in the REM statements). The four 
missiles are also displayed as a single play- 
er. This is not difficult since the missiles 
are mapped exactly the same way the play- 
ers are mapped. The only difference is that 
the missiles have individual horizontal and 
collision registers. If you're going to com- 
bine the four missiles into a single player 
in your own program, remember to line 
them up in the correct order — that is, mis- 
sile three, missile two, missile one, mis- 
sile zero. They should be spaced two 
resolution lines apart. Poke location 623 
with 17 to give all players priority over all 
playfields and to give all missiles their own 
color. You can change the missiles' color 
by poking to location 711. 
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by Brad TImmins 




Listing 1: 
BASiC 



SN 
XQ 
KM 
RL 
FH 



1 
2 
3 
4 
5 
6 
NG 



REM flTflRI STREAMERS 

REM BY BRAD TIMMIN5 

REM Substitute the lines in REN 

REM statewents for single-line 

REM resolution Players. 

REM COPYRIGHT 1988 BY ANALOG COMPUTI 



AK 50 DIM P0$tl6} ,P1$(161,PZ5C16) ,P3$C161 

,MI$fl6J ,CL$(16) 
TW 51 REM DIM PB5 (32) , PlS (32J , P2S t32J , P3$ 

(323 ,MIS(32) ,CLS(32) 
DQ 60 ? CHR$(125] :SETCOLOR 2, 0, 10 : SETCOLO 

R 4,0,10 
PH 70 GDSUB 500 

TJ 80 A=PEEK(106)-8:REM A=PEEK (106) -16 
FB 98 POKE 54279,A:PMBA5E=256»A 
EG 100 MI55ILE=PMBA5E+384:PM0=MISSILE+128 

: PM1=PM0+128 : PM2=PM1+128 : PM3=PM2+128 
ZU 101 REM MISSILE=PMBASE+768:PM0=MISSILE 

+256 : PMl=PM0+256 : PM2=PMl+256 : PM3=PM2+2 

56 
IM 110 F0NT=57344:REM ROM Character set 
LG 120 POKE 559,46:REM POKE 559,62 
GM 130 POKE 53277, 3:P0KE 752,1:P0KE 623,1 

7 
UY 135 REM Position Players 
JT 140 POKE 53248, 60:P0KE 53249, 61 : POKE 5 

3250,195:P0KE 53251,196 
RJ 144 REM Position Missiles 
LM 145 POKE 53255, 122:P0KE 53254, 124 : POKE 

53253, 126:P0KE 53252,128 
CN 150 POKE 704,128:P0KE 705,134:P0KE 706 

,128:P0KE 707,134!P0KE 711,128 
HI 155 REM Define a string of spaces 
KT 156 REM the length of the players, 
JG 157 REM to Clear out Player-Missile 
MG 158 REM neMory. 
FC 160 CL$ = " •■ 

JS 161 REM CLS=" 

II 

QX 180 FOR T=0 TO 4 

MJ 190 X=U5R(1536,MISSILE+(T»128),ADR(CL5 

), FONT, 16) 
DC 191 REM X=U5R (1536, MISSILE+ (T»256) , ADR 

(CL$) , FONT, 32) 
JY 280 NEXT T 
YM 205 REM Define Strings 
ID 210 P0$=" streaMers";PlS=P0S:P2$=P0$ 

:P3$=poS:mi$=" Atari" 
RD 215 REM copy strings to Player nenory 
MM 220 X=USR{1536,PMO,ADR(P0$),FONT,12) 
00 230 X=USR(1536,PM1,ADR(P1$),F0NT,12) 
QH 240 X=USR(1536,PM2,ADRtP2$),F0NT,12) 
SA 250 X=U5RC1536,PM3,ADR(P3$) ,F0NT,12) 
JQ 251 X=U5R(1536, MISSILE, ADR(MI$), FONT, 1 

0) 

PX 255 REM Shift Players ONE and THREE 
IC 256 REM down by one to create a 
JC 257 REM Shading effect. 



KL 270 X=USR(1677,PM1,1) 

LZ 290 X=USR{1677,PM3,1) 

GL 295 FOR T=l TO 500: NEXT T 

UK 300 REN Move Missile and Players zero 

IJ 305 REN and TMO 

HI 306 FOR T=l TO 250 : NEXT T 

55 307 FOR 1=1 TO 128 ! REN FORI=0 TO 255 

10 310 X=USR(1677,PN0,0) 

KA 320 X=U5R(1677,PM2,0) 

CH 330 X=USR(1677, MISSILE, 1) ;POKE 711,1 

HK 340 NEXT I:GOTO 306 

JQ 495 REM »»)««*flTARI STREAMER5iH««W 

TN 496 REM MACHINE LANGUAGE SUBROUTINE 

EQ 500 FOR A=1535 TO 1766:READ B:POKE A,B 

:NEXT A 
Za 505 RETURN 
MM 510 DATA 104,104,133,284,104,133,203,1 

04,133,206,104,133,205,104,141,230,6,1 

04,141,229,6 
TG 520 DATA 104,104,141,227,6,169,0,141,2 

28,6,169,32,141,231,6,173,47,2,201,62, 

240 
GX 530 DATA 5,169,16,141,231,6,172,228,5, 

177,205,41,127,201,31,176,4,9,64,208,7 
IK 540 DATA 201,95,176,3,56,233,32,141,22 

5,6,169,0,141,226,6,162,3,24,14,225,6 
BM 550 DATA 46,226,6,202,208,247,24,173,2 

25,6,109,229,6,133,207,173,226,6,109,2 

30,6 
PD 560 DATA 133,208,162,0,160,8,161,207,1 

29,203,230,207,230,203,136,208,245,238 

,228,6,173 
JO 570 DATA 228,6,205,231,6,240,7,205,227 

,6,240,2,208,164,96,104,104,133,204,13 

3,206 
AQ 580 DATA 104,133,203,133,205,104,162,2 

55,160,255,173,47,2,201,62,240,4,162,1 

27,160,126 
PM 590 DATA 104,201,1,240,19,160,0,177,20 

5,141,225,6,230,203,177,203,145,205,20 

0,202,208 
VL 600 DATA 248,240,27,138,168,177,205,14 

1,225,6,136,177,203,141,226,6,138,168, 

173,226,6 
YF 610 DATA 145,205,136,136,202,208,239,1 

38,168,173,225,6,145,205,96,0,0,0,0,0, 


KG 620 DATA 0,224,2,225,2,0 

Listing 2 

ORG 1536 



ATARI STREAMERS ML SUBROUTINE 
MRITTEN FOR THE MACRO ASSEMBLER 



THIS ROUTINE WILL TAKE A CHARACTER 
STRING AND COPY IT TO PLAYER 
MISSILE MEMORY. 



ZERO PAGE EQUATES 



PLAYER: = 203 
STRING: = 205 
CHRGET: = 207 
MOUEP: = 203 
MP: = 205 



PLA 
PLA 
STA 
PLA 
STA 
PLA 
STA 
PLA 
STA 
PLA 
STA 
PLA 
STA 
PLA 
PLA 
STA 



;GET UNUSED 
;GET MSB OF 
PLAYER+1 
;GET L5B OF 
PLAYER 
;GET MSB OF 
STRING+1 
;GET LSB OF 
STRING 
;GET MSB OF 
CHSET+1 
;GET LSB OF 
CHSET 

;get unused 
;get lsb of 

LENGTH 



BYTE 

PLAYER ADDRESS 

PLAYER ADDRESS 

STRING 

STRING 

CHARACTER SET 

CHARACTER SET 

MSB OF LENGTH 
LENGTH 



;INIT. UALUES 



-la 



NOVEMBER A.N.A.L.O.O. Computing 



LDA »e 

STO COUNT 

LD<) tt32 

STft MAX 

;TEST FOR SINGLE OR DOUBLE LINE 

;resolution. 

LDft 559 
CMP «62 
BEO GETSTR 
LDO ttl6 
5Tfi MAX 



BHE GETSTR;NOT DONE . CONTINUE LOOP, 
RETURN: RT5;D0NE.G0 BACK TO BASIC. 



GET ATASCII CHARACTER FROM STRING 
AND CONVERT IT TO FIND ITS CORRECT 
ORDER IN MEMORY. 



GETSTR: LDY COUNT 
LDA CSTRINGJ,Y 

;IF CHARACTER IS IN INVERSE, 
;UNSHIFT IT. 

AND ttl27 
Ci: CMP »31 
BCS C2 

J GRAPHICS CHARACTER 8-31 
;ADD 64 TO ITS VALUE. 

ORA »64 
BNE C3 
C2: CMP «95 
BCS C3 

;UPPERCASE CHARACTER 32-95 
J SUBTRACT 32 FROM ITS VALUE 

SEC 
SBC »32 

;L0WERCASE CHARACTER 95-127 
JDO NOTHING. THEY ARE ALREADY 
;IN THE CORRECT ORDER. 

; STORE NEM CHARACTER VALUE IN TEMP. 

C3: STA TEMP 

LDA ne 

STA TEMP+1 



MUTIPLI CHARACTER BY 8 



LDX tt3 
CLC 
C4: ASL TEMP 
ROL TEMP+1 
DEX 
BNE C4 



ADD CHARACTER SET ADDRESS, AND 
PUT THE VALUE IN ZERO PAGE. 



CLC 

LDA TEMP 
ADC CHSET 
STA CHRGET 
LDA TEMP+1 
ADC CHSET+1 
STA CHRGET+1 



COPY CHARACTER, FROM ITS ORIGINAL 
ADDRESS, TO PLAYER MEMORY. 



LDX UQ 
LDY ttS 
CPl; LDA (CHRGET, XI 
STA (PLAYER, XJ 
INC CHRGET 
INC PLAYER 
DEY 

BNE CPl 
INC COUNT 
LDA COUNT 
CMP MAX; 
BEQ RETURN 
CMP LENGTH 
BEQ RETURN 



THIS ROUTINE WILL MOVE THE PLAYER 
UP OR DOMN NITH RAP. 



PLA ;GET unused BYTE. 

PLA ;MSB of PLAYER. 

STA MOVEP+1 

STA MP+1 

PLA ;LSB of PLAYER. 

STA MOVER 

STA MP 

PLA ; UNUSED MSB OF DIRECTION. 

JSINGLE LINE RESOLUTION SETUP. 

LDX tt255 
LDY »255 

;TE5T FOR DOUBLE OR SINGLE LINE 
; RESOLUTION. 

LDA 559 
CMP tt62 
BEQ SI 

;double line reselution setup. 

LDX ttl27 
LDY ttl26 

;PULL LSB OF DIRECTION OFF STACK, AND 
;FIND OUT THE DIRECTION TO MOVE. 

Si: PLA 
CMP ttl 
BEQ MDONN 



MOVE PLAYER UP ONE BYTE AND RAP. 



LDY no 

LDA {MPJ,Y 
STA TEMP 
INC MOVER 
UP: LDA (MOVEPJ,Y 
STA (MPJ,Y 
INY 
DEX 
BNE UP 

; DONE. GO RAP LAST BYTE AROUND. 

BEQ S3 



MOVE PLAYER DOMN ONE BYTE AND RAP, 



MDOHN: TXA 
TAY 
LDA (MPJ,Y 

STA TEMP 
DEY 
S2: LDA (MOVER), V 
STA TEMP+1 
TXA 
TAY 

LDA TEMP+1 
STA {MP),Y 
DEY 
DEY 
DEX 
BNE S2 



RAP LAST BYTE AROUND AND EXIT 
ROUTINE. 



TXA 
TAY 
S3: LDA TEMP 
STA (MP),Y 
RTS 

;BYTE FIELD EQUATES 

TEMP: DB 0,0 
LENGTH: DB 
COUNT: DB 
CHSET: DB 0,8 
MAX: DB 
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Since 1981 



Lyco Computer 

Marketing & Consultants 



Air orders processed within 24 hours. 



Lyco Means Total Service. 




AATARI 

520 ST-FM Computer 




• Built-in 
Drive 

ONLY 



Mark "Mac" Bowser, Sales Manager 

I would personally like to Ihank all of our past cu^itomers (or helping to 
make Lyco Computer one o( the largest mall order companies and a 
lei\der In the Industry. Also, I would liko lo extend my potsonal Invilalion lo 
nil computer enlhuslasts who have not exoorlpncnd llio snrvicns thai we pro- 
vide. Pleoso call our trained sales stall nt our tollfjoe number to Inciuire 
about our diverse product line and weekly specials. 

First and foremost our philosophy Is lo keep abreast of the chnnginq 
market so that we can provide you wrih not only lacloryfresh tnetchnndise 
but also the newe.it models ollered by the manulaclurnis at the Absolule best 
possible prices. We offer the widest selection ol compuler hardware, sollware 
and accessories. 

Feet free to calf Lyco If you want to know more about a particular Item. I 
can't stress enough that our toil-free number is not just lor orders. Many 
companies have a loll-lreo number lor ordorinp, but if you jusl want lo ask a 
question about a prrxtuct, you liave in make a loll call. Nol at Lyco. Our 
trained sales staff Is knowledgeable about all the products we slock and is 
happy to answer any questions you may liave. Wo will do out best lo make 
sure that the product you select will lit ypur application. Wo also have Satur- 
day hours — one more reason to call us lor all your compuler neods. 
Once you've placed your order witli Lyco, we don't forget about you. 
Our Irlendly, prolossional customer sorvice reprosenlatives will (ind answers 
to your questions about the status ol an order, warranties, product availabili- 
ty, or prices. 

Lyco Computer tlockt a mulllmlllon dollar Inventory o( (actoty-tresh 
metchendli*. Chances are we have oxnclly what you want tight In our ware- 
house. And that means you'll got It fast. In tact, orders are normally shipped 
within ?4 houra. Fro» shlpplnB on prepaid orders over $50. end liioro Is no 
deposit requited on C.O.D. orders, Alt Ireiglit or UPS Biue/Hed Label sliippina 
li (villabit, too. And all products carry the full manulaclureis' wariantios. 

I can't see why anyone would shoo anywhere else. Soiection from our huge 
In slock Inventory, best price, sen/Ice that can't be beat— we've got It all here 
al Lyco Compuler. 

TO ORDER, CALL TOLL-FREE: 1-800-233-8760 
New PA Wats: 1-800-233-8760 

Outside Contitiental US Call: 1-717-494-1030 

Hours: 9AM to 8PM, Mon. - Thurs. 
SAM to 6PM, Friciay — 10AM to 6PM, Saturtday 

For Customer Service, call 1-717-494-1670, 
9AM to 5PM, Mon. - Fri. 
Or write: Lyco Computer, Inc. I. 

P.O. Box 5088, Jersey Shore, PA 17740 

C.O.D. Rtak-Fr»« Policy: • full manufacturers' warranties • no sales lax 
outside PA • prices show 4% cash discount; add 4% tor credit cards • APO, 
FPO, international: add $5 plus 3% for priority • 4-week clearance on personal 
checks • we check for credit card theft • sorry, compatibility not guaranteed • 
return auttx)rization required • due to new product guarantee, return restrictions 
apply • price/availability subject to change • prepaid orders under $50 in 
Continental US, add $3.00 



$459 



iNDUS 



95 



GTS-100 r^ 

• Atari ST 
Drive 

• 3.5" DSDD 



$195 



95 



HeadStart 



COLOR SYSTEM 

• plug in and use im- 
mediately 

• IBM-XT compatible 

• 2-360K Drives 

• Free 1-year limited 



warranty 

$989 



95 




• Hi Res color monitor includedl 

AATARI' 

HARDWARE 

520 RGB $749.95 

520 Mono $599.95 

520 Keyboard $459.95 

130 XE $135.95 

GTS 1 00 Drive $1 95.95 



1-800-233-8760 A 



AATARr 

520 ST-FM 

Color 

System 




Internal 

drive 

included 



z^ 



AATARI Z^l 

System 
Includes: 



• 130XE 
Computer 

• 551 Drive 



$299 




MAGNAVOX 

CM-8502 



• Composite 
Color 

• Green Text 
Switch 

• Speaker 

• Suggested 
Use 130 XE 



$179 



95 



JOYSTICKS 

Tac 3 $9.95 

Tac2 $10.95 

Tac 5 $12.95 

Boss $11.99 

3 Way $19.99 

Winner 909 $24.95 

Wic IBM/AP $29.95 

I Controller $13.95 

Epyx 500XJ $1 3.95 

Kraft KCIII AP/PC $16.95 



CIRCLE #103 ON READER SERVICE CARD. 




SEIKOSHA 
SP-1 80AI 



NX- 1000 

• 144 cps Draft 

• 36 cps NLQ 

• EZ Font Panel 
Control 



$165 



' w/cable purchase 



NX-1 000 Rainbow 
Color Printer $225.95 




• 100 cps Draft 

• 20 cps NLQ 

• Std, Par, and IBM Graphics 
Compatible 

Quantities 
Limited 



PRINTERS 



^ 



Panasonic. 

Office Automalion|^vA 

10801 ^ 

Model II 



• 150 cps Draft Mode 

• NLQ Mode 

• Friction & Tractor 
Feed 



$125'= $159 




95 



.IL 



SEIKOSHA EPSON' 



NX-1000 $165.95- 

NX-1000 Color $225.95 

NX-1 5 $289.95 

NR-10 $319.95 

NR-15 $419.95 

NB-15 24Pin $669.95 

NX-2400 $309.95 

NB24-10 24 Pin $399.95 

NB24-15 24 Pin $545.95 

Users $1759.95 

ND-15 $349.95 

NL-10 $149.95 

'w/cable purchase 

Toshiba 

321SL $489.95 

341 SL $659.95 

P351 Model II $899.95 

351 SX 400 cps $979.95 



AATARI 



Access: 

Triple Pack $11.95 

Leader Board Pack $9.99 

Actlvlslon: 

Music Studio $19.95 

Solid Gold Vol.#1 $10.95 

Batteries Included: 

Paperclip 80 Col $31.95 

Broderbund: 

Print Strop $25.95 

Print Shop Compan $22.95 

Graptiic Lib. I, II, III $13.95 

Bank St. Writer $27.95 

Electronic Arts: 

Pinball Con Set $8.95 

Lords of Conquest $8.95 

Starfleet I $32.95 

Ctiess Master 2000 $25.95 

Music Con Set $8.95 

Super Boulderdash $8.95 

One on One $8.95 

MIcroleague: 

Microleag. Baseball $22.95 

General Manager $16.95 

Stat Disk $13.95 

■87 Team Disk $13.95 

MIcroprose: 

Conflict in Vietnam $22.95 

F-15 Strike Eagle $19.95 

Kennedy Approacfi $13.95 



SP 180Ai $125.95' 

SP 1200Ai $159.95 

SP 1200AS RS232 ... $159.96 

SL 80Ai $289.95 

MP5420FA $999.96 

SP Series Ribbon $7.95 

SK3000Ai $339.95 

SK3005Ai $419.95 

SPB 10 $CALL 

SL130Ai $699.95 

■ Quantities Limited 

BROTHER 

M1109 $159.95 

M1509 $335.95 

M1709 $459.95 

Twinwriter 6 Dot & 

Daisy $899.95 

M1724L $619.95 

HR20 $345.95 

HR40 $559.95 

HR60 $649.95 



LX800 $184.95 

FX86E $329.95 

FX286E $424.95 

EX800 $399.95 

LQ500 $339.95 

LQ2500 $789.95 

GO3500 $LOW 

LQ850 $525.95 

LQ1050 $699.95 




Attention 
Educational 
Institutions: 

If you are not cun-ently using 

our educational service 

program, please call our 

representatives for details. 



Panasonic. 

Office ALitomation/^^^xfl 

\Jri 

10801 Model II $159.95 

10911 Model II $189.95 

10921 $299.95 

1592 $375.95 

1595 $419.95 

3131 $289.95 

3151 $459.95 

KXP 4450 User $1649.95 

1524 24 Pin $529.95 

Fax Partner $579.95 

Optical Scanner $859.95 

#CITIZEN 

120 D $149,95 

180 D $169.95 

MSP-10 $259.95 

MSP-40 $289.95 

MSP-15E $335.95 

MSP-50 $399.95 



^^^^ ^^^^ 



Access: 

Leader Board $22.95 

Tournament #1 $11.95 

10th Frame $22.95 

Actlvlslon: 

Champion. Baseball .... $22.95 

GFL Football $22.95 

Music Studio $27.95 

GBA Basketball $22.95 

Beyond Zork $28.95 

Zork Trilogy $27.95 

Broderbund: 

Superbike Challenge ... $11.95 

Electronic Arts: 

Arctic Fox $25.95 

Starfleet I $32.95 

Chess Master 2000 $25.95 

Gridiron $32.95 

Marble Madness $23.95 

Epyx: 

Sub Battle Simulator ... $22.95 

World Games $22.95 

Wrestling $11.95 

Winter Games $11.95 

Firebird: 

Pawn $13.95 

Starglider $25.95 

Golden Path $11.95 

Guild of Thieves $25.95 

Tracker $11.95 



MIcroleague: 

MIcroleague Baseball .. $33.95 

General Manager $16.95 

Wrestling $25.95 

MIcroprose: 

Silent Service $22.95 

F-15 Strike Eagle $24.95 

Gunship $28.95 

Strategic Simulations: 

Phantasie $22.95 

Phantasie II $22,95 

Wargame Con. Set $19.95 

Phantasie III $22.95 

SublogIc: 

Flight Simulator II $30.95 

Scenery Disk $14.95 

TImeworks: 

Wordwriter ST $44.95 

Partner ST $27.95 

Data Manager ST $44.95 

Unison World: 

Art Gallery 1 or 2 $14.95 

Print Master $19.95 

Fonts & Borders $17.95 

Art Gallery Fantasy $13.95 

We Stock over 3,000 
software titles! 



Monitors 



Thomson: 

230 Amber TTLyl2" .... $69.95- 

4120 CGA $199.95 

4160 CGA $199.95 

Blue Chip: 

BCM 12" Green TTL ... $64.95 
BCM 12" Amber TTL ... $69.95 

NEC 

Multisync II $589.95 

Magnavox: 

BM7652 $79.95 

BM7622 $79.95 

7BM-613 $79.95 

7BM-623 $79.95 

CM8502 $179.95 

CM8505 $199.95 

9CM-053 $CALL 

CM8762 $245.95 

8CM-515 $259.95 

CM9043 $CALL 

8CM-873 $499.95 



OKIPATA 

Oklmate 20 $129.95 

Okimate 20 v»/cart $189.95 

ISO $219.95 

182 $209.95 

182 -f $225.95 

183 $239.95 

292 w/intertace $449.95 

293 w/intertace $585.95 

294 w/interface $819.95 

393 $955.95 

Lazer 6 $CALL 

390 $479.95 

391 $649.95 

320 $345.95 

321 $445.95 

Interlacing available 

for IBM C 64, Apple 

and Atari 



Modems 



Avatex: 

1200e $65.95 

12001 PC Card $65.95 

1200p $89.95 

1200hc Modem $79.95- 

2400 $149.95 

2400i PC Card $139.95 

-iv/caWo purchase 

Hayes: 

Smartmodem 300 $139.95 

Smartmodem 1200 .... $279.95 
Smartmodem 2400 .... $419.95 



Avatex 
1200E 




by Clayton Walnum 



Nimral's Grace 




s promised last month, here's the 
sequel to The Slave Cellars of 
Molgoloth, and if you thought just 
rescuing the princess was tough, wait until 
you try to find out who's trying to put her six 
feet under. Yep, Slave IT. Nimral's Grace is a 
mystery, and in order to be successful in your 
attempt to bring the would-be assassin to 
justice, you're going to have to search high 
and low for ten vital clues. Only when you've 
gathered all the evidence, will you be able to 
put the culprit behind bars. 



: thought vcsc 
to find out wl 



he princess was tough, wait until 
eying to put her six feet under. 
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Typing it in 

To make your copy of Slave II, follow ex- 
actly the instructions shown below: 
. 1) Type in Listing 1, using B4SIC Editor 
to verify your work. Once you have the list- 
,. ...I^ccurately typed, save it to disk. 
' 2) With a disk in Drive 1, run the program 
you typed from Listing 1. A file named 
LINES. LST will be written to your disk. 

3) Type in Listing 2, using B/iSlC Editos 
//to verify your work. Once you have the lisfl 
ing accurately typed, save it to disk. J 

4) With the program you typed from Li 
ing 2 still in memory, type ENTEk 
"D:LINES.LST" and press Return. The file 
created in Step 2 will be merged with the pro- 
gram lines already in memory. 

5) Type SAVE '■D:SLAVE2.BAS" m ' 
press Return to save the complete pi 
to disk. Slave II is now ready to runi 

Playing a text adventure game 

Like most simple te.xt adventure games, 
you communicate with Slave II by typing two- 
word commands in a verb/noun format (for 
example, OPEN DOOR). There are a tew ex- 
ceptions to this format, however. All direc- 
tional commands should be abbreviated to 
one letter (N, S, E, W, U or D). To move 
north, for instance, you would simply type 
A' and press Return. There are also times 
when Slave II will accept one-word 
responses. You'll discover these as you play. 

One command that you'll want to use be- 
fore trying anything "dangerous" is SAVE 
GAME. Saving your position in the game al- 
lows you to continue where you left off should 
your character be killed. You should also save 
your game when you're finished with a ses- 
sion, so you can pick up where you left off 
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when you're ready to play again. To resume 
a saved game from within Slave II, simply 
type the command LOAD GAME. 

Sometimes, a response to a command will 
contain more text than will fit in the text win- 
dow. When this happens you will see the first 
few lines and the computer will beep. When 
you've fmished reading the text on the screen, 
press Return, and the next few lines will be 
shown. 

Hint department II 

The following adventure hints have been 
encoded by a forward cycling of the alphabet. 
That is, the letter A has been changed to B, 
the letter B has been changed to C and so on. 
To use the hints, find the question that ap- 
plies to your problem, and decode the first 
hint in the list following the question. If, af- 
ter decoding the first hint you're still stuck, 
decode the next. The last hint in the list is 
the solution. 

How do I get past the fire? 

1) Uifsf t b mblf ofbscz. 

2) Xbufs Iffqt zpv dppm. 

3) Kvnq jo uif mblf boe hfu xfu. 

How can I get to Nimral's Grace? 

1) Ju't upp gbs up xbml. 

2) Zpv dpvme vtf b ipstf . 

3) Qsbz bu uif tubuvf. 

How do I get past the guard? 

1) Zpv dbo'u ep ju bmpof. 

2) Zpv offe tpnfpof gspn uif djuz xjui zpv. 

3) Tibmb nvtu bddpnqboz zpv. 

How do I read books? 

1) Gjstu zpv nvtu pqfo uifn. 

2) Tpnfujnft zpv dbo uvso qbhft. 

How can I get from night to day or day to 
night quickly? 

1) Tmffqjoh jt b hppe xbz up qbtt uif ujnf . 

2) Zpv nvtu cf jo zpvs sppn up tmffq. 

3) Kvtu uzqf HP CFE. 

How can I get out of jail? 

1) Zpv dbo'u. 
How can I get the priest to talk? 

1) Uzqf UBML QSJFTU. 

2) Zpv ibwf up cf b nfncfs. 

3) Sfbe uif cppl jo uif mjcsbsz. 

4) Zpv'mm offe tpnf cmbdl qbjou. 

5) Qbjou b cmbdl epu po zpvs gpsfifbe. 

Where can I get the password? 

1) Ibwf zpv gpvoe b xbsespcf zfu? 

2) Uifsf t tpnfuijoh cfijoe uif xbsespcf. 



3) Npwf uif xbsespcf. 

4) Mppl bu uif bmubs. 

How can I get into the king's quarters without 
getting arrested? 

1) Zpv dbo'u mfu ijn tff zpv. 

2) Xbju voujm ift tmffqjoh. 

3) Hp bu ojhiu. 



What's with the throne? 

1) Uifsf t tpnfuijoh cfijoe ju. 

2) Npwf uif uispof 

How do I get past the steel door? 

1) Zpv offe b Ifz. 

2) Hfu uif Ifz gspn tpnfpof. 

3) Uif qsjftu ibt uif Ifz. 

What about registering animals? 

1) Zpv ibwf up sfhjtufs zpvs ipstf. 

2) Hp up uif tnbmm pggjdf. 

3) Ufmm uif nbo up SFHJTUFS XIJUR 

How can I survive being stabbed? 

1) Xfbs tpnfuijoh qspufdujwf. 

2) Ibwf zpv gpvoe uif dibjo nbjm? 

3) Zpv nvtu ibwf uif dibjo nbjm. 



How do I turn in the culprit? 

1) Gjstu zpv nvtu ibwf fopvhi fwjefodf. 

2) Hp up uif qfbdflffqfs. 

3) Uzqf BDDVTF gpmmpxfe cz uif qfstpo't 
obnf. 

What are the ten pieces of evidence? 

1) Cfgpsf zpv sjef up Ojnsbm't Hsbdf, gjoe 
uif ejsu boe mppl bu ju. Uifo mppl bu 
uif gppuqsjout. 

2) Gjoe uif bnvmfu boe mppl bu ju. 

3) Hp joup uif tipfnblfs't tipq boe sfbe ijt 
cppl. Epo'u gpshfu up uvso uif qbhf. 

4) Sfnfncfs uif cspxo ipstf zpv tbx sjejoh 
bxbz? Hp joup uif tubcmft boe mppl bu 
uif cspxo ipstf Uifo mppl bu uif tbeemf. 

5) Gjoe tpnf bmf boe hjwf ju up uif nbo 
jo uif tnbmm pggjdf. Xifo if tfut epxo 
uif tjmwfs cppl, qjdl ju vq boe sfbe ju. 

6) Gjoe uif kfxfmsz cpy boe mppl bu ju. 

7) Qpvs uif qpjtpofe xjof gspn uif ubolbse. 
Gjoe uif gjohfsqsjou Iju boe gjohfsqs- 
jou uif fnquz ubolbse. 

8) Npwf uif xbsespcf boe mppl bu uif 
bmubs. 

9) Gjoe uif opufcppl boe mppl bu uif 
dpwfs. 

10) Pqfo uif opufcppl boe sfbe xibu't jotjef 




YE 
GP 



«S MP 



TH 10 DIM L$C120) 

E5 20 OPEN ttl,8,0,"D:LINE5.LST" 

CR 30 LS="5828 CCS=" : L$ CIO) =CHRS C345 

PZ 40 FOR X=l TO 77:REfiD A : L$ ClO+X) =CHR$ C 

A} :NEXT X 
KM 50 LSC10+X)=CHR$t34) :? LS:? «1;LS 
FF 60 LS="5840 DS=" : LS t9) =CHRS £34) 
DH 70 FOR X=l TO 37:REflD ft ! LS t9+X) =CHRS (fl 

) : NEXT X 

80 LSt9+X)=CHRSC34) !? LS:? BljLS 

90 LS="5860 ES="!LSC9)=CHRS{34) 
KF 100 FOR X=l TO 78 : READ ft : LS C9+X) =CHRS C 

ft) :NEKT X 

110 LSC9+X)=CHRSt34) :? LS : ? «1;LS 
UZ 120 LS="5880 LS=" : LS (9) =CHRS C34) 
Gft 130 FOR X=l TO 35 : REftD ft ; LS C9+X) =CHRS C 

ft) !NEXT X 
MU 140 LSC9+X)=CHRSC34) :? LS ! ? «i;LS 
IH 150 CLOSE «l:EHD 

QO 999 REM KKKXKKICXK CCS DftTfl KXKXXKKKX 
S5 1000 DftTA 104,104,133,204,104,133,203, 

104,133,206,104,133,205,104,104,133,20 

7,169,0,141,255,6,170,133,213 
ZT 1010 DflTft 232,160,0,177,283,209,205,20 

8,8,200,192,4,208,245,134,212,96,173,2 

55,6,24,105,4,197,207 
BO 1020 DftTft 240,20,141,255,6,165,205,24, 

105,4,133,205,165,206,105,0,133,206,24 

0,211,208,209,169,0,133,212,96 
DD 1099 REM ICMXXXKMXX f>$ DftTft XXXXXXXXX 
PG 1100 DftTft 216,104,104,133,204,104,133, 

203,104,104,133,205,160,0,177,203,201, 

61,240,11,56,233,1,145,203 
KU 1110 DftTft 200,196,205,208,240,96,169,3 

3,240,244,208,242 
DZ 1199 REM XXXXXXXXX ES DftTft XXXXXXXXX 
HZ 1200 DftTft 104,104,104,141,254,6,104,10 

4,141,255,6,165,88,133,203,165,89,133, 

204,162,0,236,255,6,240 
HC 1210 DflTft 18,165,203,24,105,40,133,203 

,165,204,105,0,133,204,232,240,235,208 

,233,169,0,170,160,39,145 
HW 1220 DftTA 203,136,16,251,232,236,254,6 

,240,17,165,203,24,105,40,133,203,165, 

204,105,0,133,204,169,0,240,226,96 
JL 1299 REM XXXXXXXXX LS DftTft XXXXXXXXX 
VL 1300 DftTft 104,104,104,141,255,6,104,13 

3,204,104,133,203,160,0,177,203,201,32 

,240,8,200,204,255,6,208 
QM 1310 DftTA 244,160,0,132,212,169,0,133, 

213,96 
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CM" 



JI a REM * BY CLflVTOM WflLHUM » 
* REUI5ED 7/22/88 * 
OZ 1 Nli=ll:N12=12:N13=13:M14=14:H15=15:N 
16=16 !H17=17:Ni8=18:N19=i9:H20=2O:N18O 

o=ieoo:N6760=67ea 

H¥ 2 Hl=l:N2=2:N3=3;M4=4:N5=5:H6=6:M7=7:N 

8=8 ; H9=9 ! Nie=lQ ; MU=26 : NH=59 : 5Z=19 : GOTO 
5208 
5(1 3 fl = U5RCftDBtD$l ,ftDRCfl5j,LEMCfl$5) SRETUR 

H 
JU 4 GOSUB N3:? 0$:GOSUB Kll : flS="" : RETURN 
J¥ 5 CL=NO:F0R K=Hi TO HIO : CL=CL+CL CXJ : HE 

XT X ' RETURN 
HN 8 FOR K=255 TO NO 5TEP -G.5:50UND Na,K 

,H19,H8:NEKT K : FOR K=N16 TO NO 5TEP -0 

.l:50UND N0,108,N8,K:NEXT X:RETURN 
QY 9 FOR X=N1 TO ISOO ; NEXT X:RETURN 
JI 19 ft=U5R£flDRCE$>,N5,C) :P0SITI0N N2,C:R 

ETURN 
ZD 11 CLOSE ttliOPEH ttNl, N4, HO, "K: " : GET UN 

l,fl:CL05E ttNl:RETURH 

EY 12 ? "I don't understand. "sGOTO lOGO 

BY 40 0=U5RCflDRCESj ,N1,N1) :P0SITI0N N2,N1 

OX 45 N=N0:5=Ne:E=N0:H=N0:U=N0:D=N0:G05UB 

R«N10: POSITION N2,Nl:G05UB N3 : ? tt6;A$ 

!A$=""!RETURN 
MO 58 flS="P0!b!Cfbdi"!lC41)=-H5:RETURN 
EU 51 flS="Uif StMbwfStlbSf ibqqspbdi johlgbt 

U! ! ! ! ! IgspnIUif !xftU=*":E=N7:RETURH 
ZD 78 ft$="Jo!Uif !gpsftU":E=N8:H=H12!lC41J 

=-R:I(24)=-R:RETURN 
BN 88 fl5="CfhjOOjOh!pg!blspbe";N=H9:E=N13 

! M=N7 ! RETURN 
DE 98 fl$="Jo!uif !gpsftU"!N=80:S=NB!W=N12: 

It24)=-R;RETURH 
NZ 120 aS="Jo!b!dnfbSjOh":E=N9:5=N7;N=79: 

RETURN 
MR 138 A$="P0!b!Mpoh!spbe":M=N8;E=N15:RET 

URN 
EC 131 ftS="Jo!uif iejtubodf !zpv!tff Itpnfpo 

f !hbM. ! ! npq Johibxbz !po !b!cspxo ! ipstf/L] 

":G05UB N4:RETURN 
ZU 150 fiS="OjnsbMtt!Hsbdft(lgspou!hbuf:W 

=N13 ! RETURN 
IH i6B A$ = "J0!b!dpvsuzbse";N = 21:E = 25:S=:Nl 

7 ! CY— NJ. ■ RETURN 
KD 161 fl$="B!nbO!tUfqt!gpsxbse/! !TibMb!tb 

zt-! ! ! ! ! CEpnops-fnzlcfuspui fe- ! xizlbsf 

!ZPW! I ! lifSf ! jOlOjnsbMCtlHSbdfOCU" 
UC 162 GOSUB N4;A$="EpnDps!Ublft!TibHb! Jo 

! i jt!bsnt!boe! ! ! !tbzt-! CTibMb- ! nz ! Mpwf 

-luibol iOjnsbM! ! !zpw!bsf !tbgf=CU" 
KO 163 GOSUB H4 : flS=" CXi f o ! J ! i f bse ! pg !zpvs 

! dbquusf ! Jidbnf ! !up!pggfs! nz! tfswjdft ! 

uplzpuslgbuifs- ! !ui f ! 1 joh/Ctl" 
UT 164 GOSUB H4 : ftS=" CDpnf- ! TibMb- ! zpws I gb 

n jMZ! bxb jut !zpv/CEpMops!Mpplt ! bulzpv/! 

CXbssjps-!zpv! ! ! IXjMMiCf !sfxbsefe=(U" 
HJ 165 GOSUB N4:fi$="CHVbset=! !Tipx!pvs!hV 

ftulupii jt! !!!!!! ! rwbsuf St/ CU" 
MR 166 GOSUB N4 : A$="" ! R=39 : UL=N1 ! UI=N1 : EN 

T=N1:ICN5)=-43:ICN7)=-76:G0T0 N1B88 
LR 170 fl5="P0!b!tUSf fU";N=N16;RETURN 
UR 210 A$="P0!b!tUSf fU"!W=22:N=23:S=N16;R 

ETURN 
UL 220 fl5="Cftjef !Uif !djUZ!xbMM";N=24;E=2 

l:IC49)=-R:RETURN 
Jft 238 flS="Po!b!tUSf fU":H=24!S=2l!RETURN 
SK 240 ft$="Cftjef !uif !djUZ!xbMM":E=23;S=2 

2:CY=Nl;IC49}=-R:RETURN 
RC 250 A$="BU!Uif iqbnbdf !hbUf":M=Nie;E=27 

■ RETURN 

KY 270 A$="J0!bi ibnM":W=25:U=38;H=28;D=49 

:E=30:I(25)=-R:RETURN 
BK 280 flS="Jo!Uif !QfbdflffqfSt!pggjdf":5= 

27:RETURN 
BM 290 flS="JO!b!kb jM!dfMM":RETURM 
JU 300 fl$="Jo!b! ibM«":W=27:N=31:E=33:5=32 

OL 310 fl$="J0!uif !hVbse!sppn":S=30:RETURN 
BB 320 fl$ = "J0!uif IspzbM! e jo job !sppn";N=30 

■ PE JURN 
NN 330 O$="Jo!b!ibHH":H=30;N=34:S=35;U=44 

■ I C25} =~R i RETURN 

NQ 340 ft$="Jo!uif luispof !sppn":5=33;RETUR 

N 
DZ 350 flS="Jo!uif !twqqMZ!sppn":M=33:RETUR 

N 
flO 380 ftS="JO!b!ibMM"!N=39:S=40!D=27:E=41 

i J £25) =~R ! RETURN 
JU 390 ftS="Zpvs!rybsufst":5=38:RETURN 
JI 391 AS="B ! tfSWbOU! fOUfSt ! Ui f ! Sppn IX jUi 



!b! ! ! ! ! ! Ubolbse ! pg 1 X jof / ! ! CDpvsUftZlpg 

!uif ! ! I ! ljOh-!nz!Mpse/(U": GOSUB N4 
PX 392 RM=N1:RETURN 
NB 400 0$="Jo!0jlOjl !Uif IKftupsttirwbSUfS 

t" ' N = 38 I RETURN 
TE 410 A$="Jo!b! ibHM":W=38:N=42:E=44:S=43 

• pETURN 

CO 420 ftS="Jo!EpMopsCt!rvbsufst";S=4l:RET 

URN 
ZM 430 flS="Jo!TibMbtt!rvbSUfSt";H=41;SH=H 

l! RETURN 
XM 448 fl$="Jo!b!ibHH"!W=41:H=45:l>=33!S=46 

■ J f 25) =~R : RETURN 

ao 450 ftS:="Jo!Epnojt!uif !BewjtpsCt!r«bsuf 

St":S=44:RETURN 

FU 460 fiS="Joluif !l johCt!rgbsufst":N=44:R 

ETURN 
PG 490 flS="Jo!b!ibMM":H=52:E=58:U=27:RETU 

RN 
UE 500 AS="J0!b!ibMI>l":H=49:H=53:E=54:RETU 

RN 
XL 520 ft$="Jo!uif !difnjtutt!MbC":S=49:RET 

URN 

OJ 530 fiS="Jo!uif !rwffott!rwbsufst"!S=50: 

RETURN 
PM 540 ft5="J0!Uif !MjCSbSZ":W=50:RETURH 
HR 650 A$="JO!Uif !dbUbdpnct":W=34:N=65:E= 

66:S=55:RETURN 
T5 660 fiS="Jo!uif !dbUbdpnct":W=66:5=65:E= 

65:N=71:RETURN 
GP 710 ftS = "Jo!b!ebSl!UfnqHf ■!N=72:S = 66:RE 

TURN 
BK 720 flS="Jo!b!tupsbhf !sppn":5=71:RETURN 

HG 730 flS="Jo!uif ipggjdf !pg!bojnbM!sfhjtu 

SZ";E=N17: RETURN 
UC 740 fl$="BUIUif !tipfnblfSCt":W=23:RETUR 

N 
UG 750 ft$="BU!Uif !qbX0!tipq":M=21:RETURN 
MI 760 AS="Bu!uif !tUbCMft":W=N17:RETURN 
WM 770 ftS="Jo!b!tnbMM!dibqfM":S=23:RETURN 
UR 788 0$="Jo!b!ebsl !uvoofn":E=24:CY=N8:R 

ETURN 
IF 790 ft$='"Jo!b!nfbepx":5=N12:E=88:RETURN 
QY 800 ftS="Jo!b!nfbepx":W=79:S=N9:RETURN 
lA 810 A$="Jo!b!ufDU":H=N8:RETURN 
KD 980 RESTORE 6120:F0R X=N1 TO NN:READ A 

$,A:Q=5Z-LEN{A$) :I$CX»5Z-C5Z-HH ,X*5Z- 

Q)=A$:ICX)=A:NEXT X 
YN 905 RESTORE 6100:F0R X=H1 TO NU:READ A 

:UCX)=a:next X 

QT 925 GOTO 6280 

TX 950 C=N5:G0SUB NIO 

SB 951 FOR X=N1 TO NN:IF ABSCICX}}=R THEN 

? ttN6;I$CX»SZ-SZ+Hl,X*5Z) iIT=Nl 
NQ 953 NEXT X:IF IT=H0 THEN ? ttNej"Nothin 

3" 
AB 954 RETURN 
HI 960 A=USRCADRCE$) J Nl, Nil) : POSITION N2, 

Nil: IF N+S+E+H+D+U=N0 THEN ? aN6j"Hone 

II ■ PETURN 
BF 962 IF N>N0 THEN ? SN6;"North "; 
KU 963 IF S>N0 THEN ? ttN6;"S0Uth "; 
LA 964 IF E>N0 THEN ? ttN6;"EaSt "; 
LZ 965 IF W>N0 THEN ? »N6;"West "J 
YD 966 IF U>NO THEN ? «N6;"Up "; 
DY 967 IF D>N8 THEN ? «N6;"D0wn" 
ZT 978 RETURN 
JM 988 C=N14:G0SUB NIS 
UL 981 FOR X=N1 TO NH:IF I CX) =-Nl THEN ? 

«N6;lSCX»SZ-SZ+NljX»SZ) ;INU=H1:NEXT X! 

RETURN 
AN 982 NEXT X:IF INy=N0 THEN ? SNej-Nothi 

ng" 

AE 983 RETURN 

MA 1000 IF LEHtAS)>NO THEN A=USR CADR CDS) , 

ADR (AS) , LEN CAS) ) ; ? AS : AS = "" 
KU 1020 IF UL THEN GOSUB 40:GO5UB 950:G0S 

UB 960 
UF 1040 IF US THEN GOSUB 950 
QP 1060 IF UD THEN GOSUB 960 
UP 1088 IF UI THEN GOSUB 988 
FI 1188 IT=N8:INV=NB:UL=N8!US=M8:UD=N0:UI 

= N0 
QB 1120 IF R=N16 AND NOT ENT THEN GOSUB 

NlllGOTO 161:A$="" 
ET 1130 IF R=46 AND DY>NO THEN AS="Hwbset 

=!BSSftu!ui jt!nbO=U":G0T0 6600 
PY 1140 IF DD THEN GOSUB N9:G0T0 7240 
JU 1160 IF R=39 AND NOT RM THEN GOSUB 39 

l:flS="" 

BC 1165 IF R=H13 AND NOT SE THEN GOSUB 1 

31:SE=N1 
AE 1166 IF R=42 AND DY>N0 AND IC46)=-R TH 

EN GOTO 4606 
ZD 1167 IF DY>N0 AND IC46)=-R THEN I(46)= 
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HO 
BN 1188 IF TURN/100=IHTCTURH/100J THEM GO 

SUB 6500 
EW 1200 IF R=43 fiND DY>M8 THEM GOTO 6560 
TK 1210 IF R=43 AND ICN183=-40 THEM I tN18 

)=-41 
OU 1211 IF R041 OR It55)=-Nl OR I CM18J <> 

-R OR NKON0 THEN 1213 
OM 1212 fl5="OjlOjliqMVOhft!b!10jgf ! jOizpw 

SJdiftU=U":G05UB N4:G0TO 7240 
SM 1213 IF R=41 AND ICN18}=-R AND NK=NO T 

HEM A$="0jlOjl !tUbCt!zpv-!cgu!Uif !dibj 

OinbjM! !tbWft!zpv=":HK=Nl:GOTO N1O0O 
PT 1214 IF 5H AND IC363 0-N2 AND DY>N0 TH 

EN K=RND(N0}:IF X>0.9 THEN 6741 
JE 1215 IF R041 AND NK THEN ItN18J=-40 
ZI 1228 IF R=29 THEM CHT=CNT+N1 : IF CNT=N5 

THEN 6640 
HH 1230 IF R=N5 AND TURN=N8 THEN 6744 
GM 1248 T RAP 1240 ! POSITION N1,N15:? ;? "E 

MM!,V.1iri "! iPOKE 752, NO 
JU 1260 SOUND N8,N28,N10,N8iF0R K=N1 TO N 

lOlNEXT X:SOUND HO, NO, N8, NO : INPUT IN$: 

POKE 752 Nl 
HO 1280 TURN=TURN+Nl:IF TURH>288 AND CY A 

ND NOT RG THEN RG=N1 ; GOTO 6728 
IJ 1308 IF R=N8 AND INS="E" AND ICN7)<>-H 

1 THEN A$="Jutt!upp!gbs!up!xbMl/":GOTO 
N10OO 
IP 1348 IF R=N12 AND IH$="PRAY" THEN 5860 
SW 1368 IF ICN103O-N1 OR IN5<>"W" OR R<> 

74 THEN 1400 
UR 1380 AS="Uif !tipfnblfS!tdSfbnt-! tTupq- 

!uif jg=! !UibU(tJnz!cppl=CU":UI=Nl!lCNl 

8}=Ne:G0T0 6688 
OJ 1400 IF IC33JO-N1 OR INS<>"E" THEN 14 

68 
VI 1420 AS="CTupq-!ui jfg=! !Uibu!cppl! jt! ! 

!!!!!!!! ! hpwf sonf OU! qspqf SUZ= CU" : I (33) 

=N8:UI=Nl:G0T0 6680 
SE 1468 L=LEN(IN$} :IF L=N1 THEN U$=IN$:GO 

TO 1820 
CU 1488 A=U5RCADRCL$),L,ADRCINS}] :IF A=N8 

THEN GOTO N12 
HL 1508 U$=IN$CN1,A] ;N$=:IN$CA+N2,LEN(IN$) 

] 
EM 1520 IF US="5AUE" THEN 7068 
YU 1549 IF USz"LOAD" THEN 6828 
KB 1568 IF LENCV$}<N2 OR LENCN$]<N3 THEN 

GOTO N12 
FI 1589 IF LEN(U$)=N2 THEN USCN3)=" " 
PD 1609 IF LENCy$)=N3 THEN U5{N4)=" " 
DO 1610 IF LENCN$)=N3 THEN N$CN4)=" " 
XA 1620 Y=USR(ADR(CC$},ADRCN$1 , ADRCNN$} ,L 

ENCNN$}} 
5S 1649 Z=USRCADRCCC$1,ADR(U$] , ADRCUB$] ,L 

ENCUB$}] 
NP 1669 IF NS="PAGE" AND Z=25 THEN 1748 
LE 1688 IF N$(N1,N4)="H0R5" OR N$="BOOK" 

THEN ? "Refer to it by color. ":GOTO Nl 
808 
BS 1685 IF NS="DOOR" THEN ? "Mhich one?": 

GOTO Nieoo 

DE 1709 IF Z=N15 AND N$ CHI, N4J ="F0RE" THE 

N 1740 
HQ 1729 IF y=N8 OR Z=N9 THEN GOTO N12 
ZD 1740 Z=UCZ) 

KY 1760 IF Z>N15 THEN Z=Z-N16:G0T0 1808 
JM 1780 ON Z G05UB 2028,2540,2738,2988,29 

61,3020,3880,3205,3245,3308,3388,3580, 

3789,3980,4168,4228 
IM 1880 ON Z GOSUB 4601,4581,4740,4780,48 

40,4980 
PD 1829 IF U$="N" AND N>NO THEN R=N : GOTO 

1960 
BM 1840 IF U$="5" AND S>H0 THEN R=5:G0T0 

I960 
TC I860 IF U$="E" AND E>H0 THEN R=E:GOTO 

1968 
MI 1880 IF U$="W" AND W>NO THEN R=M:GOTO 

I960 
GM 1900 IF US="U" AND U>NO THEN R=U:GOTO 

1960 
QF 1920 IF US="D" AND D>NO THEN R=D:GOTO 

1969 
EL 1940 ? "QNO such DIRECTION I "; GOTO N108 


NT 1960 UL=Nl:GOT0 NIOOO 
FU 2020 IF R=N12 AND Y=N4 THEN A5="UifSft 

t!b!qMbrwf !po! jU/" ! I C43) =-R : U5=Ni ! GOTO 
N19O0 
KK 2040 IF R=N12 AND Y=43 THEN AS="UifSfC 

t!XSjUjOh!po! jU/'":GOTO 1000 
LA 2068 IF R=N9 AND Y=29 THEM ItN3)=-R!US 

=Nl!A$="Gppuqs jOUt=":G0T0 N1O00 



MB 2080 IF R=N9 AND V=3 THEN A$="UifZ(Sf! 

be puu 1 1 j* f ! 21/" : CL tH8) =N1 : GOTO N1880 
BP 2188 IF R=24 AND N$ (Nl, N3) ="GRO" AND I 

t35)=N8 THEN A$="Ui f ! hspvoe ! npplt ! e JtU 

VSCfe/":GOTO Ni880 
KA 2160 IF R=M5 AND Y=42 THEN A$="UifZ!Mp 

pi !bxguMMz!nfbo=":GOTO Nioeo 
XL 2180 IF R=N5 AND V=41 THEN AS="Zpv!tff 

!uif igpsftuluispvhi !Uif !gi<lbnft":G0T0 N 

1008 
IF 2208 IF R=N5 AND Y=28 THEN A$="Uif!XbU 

fs!HppitidpMe=":GOTO Niooe 

CP 2220 IF CICYJ=R OR ICY)=-N1) AND Y=N5 
THEN A$="Tif Ct!cfbWUjgVM=":GOTO N100O 

5M 2240 IF R=43 AND V=H5 THEN A$="Tif!Mpp 
It! ibqqzlupitf f !ZPV=":G0T0 NIOBB 

YS 2260 IF R=74 AMD Y=M10 THEN A$="Uif!dp 
WfSltbZt; ISPZBM!TJ[FT":G0T0 N1888 

OH 2288 IF R=76 AND Y=N7 THEN AS="JUtt!zp 

wst-!e«nnz=":G0T0 NlBBB 

UH 2388 IF R=76 AND Y=26 THEN A$="JUCt!Xf 

bs job ! b ! tbeeHf /" : I C37) =-R : US=H1 : GOTO N 

1008 
JN 2328 IF R=76 AND Y=37 AND I (Y) =-R THEN 
AS = " Ju ! i bt ! U i f ! Obn f ! UPQQF5 ! po ! jU/" ! CL 

CN5]=Nl:G0TO Nieoo 
UI 2348 IF {R<>22 AMD R<>24) OR y<>49 THE 

M 2400 
PT 2368 AS="Mput!pg!gMpxfSt!ifSf/":IF R=2 

4 AND I(35)=N0 THEN A$ CLEN (A$} +N11 =" ! ! 

Gwooz-!uif ! ! ! ! ! e jsu ! tf f nt ! e jtuvsc f e/" 

CE 2388 GOTO N18e8 

SM 2400 IF R=73 AND Y=38 AND I £33) =N8 THE 

N AS="If Ct! ipMejOh!b!t jMWfs!cppl/":GOT 

NIOOO 
YH 2428 IF ItY)=-Nl AND Y=33 AND 5IL=N0 T 

HEM A$="Uif !dpwfS!tbZt; ! SpzbM! Bo jnbMt" 

:GOTO Nieoe 

KY 2448 IF R=77 AND Y=44 THEM AS="If!Mppl 

t!b!C ju!tjOjtUfS/":G0T0 N1008 
LN 2468 IF R=42 AND DV>N8 AND (V=N2 OR Y= 

21) THEN A$="(UibUCt!qsJWbUf !qspqfSUZ= 

! !HVbset=CU":G0T0 6688 
PM 2488 IF R=42 AND Y=N19 AND DY>N8 THEN 

A$ = "I f (t ! Xbud i Job ! zpu ! XbS jMZ/" : GOTO Nl 

000 
XU 2481 IF R<>42 OR Y<>46 OR I(Y)<>-R THE 

N 2483 
DJ 2482 AS="UifSf ttSuif !xpse!EB5L0FTT!cf|i| 

pxiuif ! ! igjhvsf !pg!HpnhpMpUi/";CL(Nl)= 

Ni:GOTO Niooe 

ZO 2483 IF V=22 AND I CY) =-Nl THEN AS="Uif 
!dpwfs!tbZt; !Q5JFTUT!PG!HPMHPMPUI";CLC 
N9)=Nl:G0T0 N1088 

GB 2485 IF V=N2 AND ICN2)=-N1 THEN AS="Ui 
fSf Ct!b!tUbs!tibqf iqsfttfe! joup! ! ! ! !ui 
f !wfnWfU/":CLCN2)=Nl:G0T0 N1008 

NG 2486 IF Y=N1 AND ICY)=-N1 THEN A$="ju t 
t! jOlUif !tibqf!pg!b Stubs/"! CLtN18)=Nl: 
GOTO N1880 

KL 2500 ? "You see nothing of interest.": 

GOTO N1888 
LM 2540 IF ICY)=-R THEM ? "YOU CAN'T GET 

THAT!":G0TO N1088 
SM 2560 IF ItY)=-Nl THEM ? "YOU ALREADY H 

AUE IT!":GOTO 1108 
VI 2688 IF AB5tICY)><>R THEM ? "I DOM'T S 

EE ACM) ■";NS;"'"!GOTO 1188 
LC 2618 IF R=42 AND DY>N8 AND CY=H2 OR Y= 

21) THEN A$="(UibuCt!qSjWbUf !qspqfSUZ= 

! !Hvbset=CU":G0T0 6688 
ZP 2628 LOCATE N2,N18,A:IF A<>32 THEN ? " 

YOU CAN'T CARRY ANYMORE !": GOTO N1008 

RI 2660 ? "Okayt":ICY)=-Ml:US=Nl:UI=Hl!GO 

TO 1008 
LL 2680 GOTO N67e8 
JP 2730 IF R041 OR I(N18)<>-41 OR Y<>36 

OR IC36)<>-N1 THEN 2740 
US 2731 AS="If iUblftlUif !hpMe-!qspnjtft!0 

puiup! ! ! InfoujpoizpwSxfsfljoiTibMbttIs 

ppn/":IC36)=-N2!UI=Nl!G0T0 NIOOO 
OP 2740 LOCATE N2,N8,A:IF A<>32 THEN ? "T 

HERE'S NO MORE ROOM HERE!":? : GOTO 110 


SK 2760 IF ICY)<>-N1 THEN ? "YOU DON'T HA 

UE IT!";? :GOTO 1108 
NJ 2780 IF R<>73 OR IC40)<>-N1 THEN 2840 
SO 2800 A$="If !ublft!uif !cpuUMf-!bCtfOUn j 

oefehz! ! !tfuujoh!epxo!uif!cppl/" 
MN 2820 I(33)=R:It4O)=N0:U5=Nl:UI=Ml:GOTO 

N1009 
IL 2848 ? "Okayt":ICY)=R:US=Hl:UI=Nl:G0TO 

NIOOO 
LJ 2860 GOTO N6760 
5Q 2900 IF Y=N10 AND I CY) =-Nl AND PG=N0 T 
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EU 
PY 



ZJ 



LF 
RQ 



LR 
UH 

KO 
HU 

CB 

CO 

KH 
YW 
QI 

5E 

KM 
IH 



KY 
KZ 



UU 



KU 
YY 

51 



uz 

EK 



AB 
XO 



BL 
KY 
XN 

UA 

KU 
EE 
KT 



DY 
5H 



ZL 



OM 



JE 



TC 



KB 
ZH 



UP 



EC 



UD 



NOT NB 
NOT DI 



NOT GR 



IC45] 
;IC45} 



:-Nl THEN 
:N0!IC57} 



ft$="PW 
:-Nl:UI 



THEN t>S- 
IhSfbUfS! 



HEN 0$=0$!PG=N1:GOTO NIOOO 

2920 IF 5IL=H0 AND Y=33 AND I tYl =-Ni T 
HEN A$=0$:SIL=Nl:GOTO NIOOO 

2921 IF V=22 ftND I CY3 =-Hl AND 
THEN A$=0$:NB=N1:G0T0 NIOOO 

2924 IF Y=N14 ftND I CY) =-Nl ftND 
ft THEN ft$=0$:DIA=Nl:GOTO NIOOO 

2925 IF Y=39 ftND I CY) =-Nl AND 
THEN A$=0$:GR=Nl:GOTO N1800 
2940 GOTO N6760 

2961 IF R=34 AND Y=53 AND ItN12)=-Nl A 
ND HY)=-R AND NOT UNL THEN ft$="Uif!l 
fzlvowpdlfe! jU/":UNL=Nl:GOT0 NiOOO 

2980 GOTO Neyeo 

3020 IF Y=45 AND I CV) =-Nl THEN A$="Tpn 
fui johiubtuftigwooz! ifSf=":GOTO NIOOO 
3040 GOTO N67e0 
3080 IF R075 OR ICN11)<>-N1 OR YONll 

THEN GOTO N6760 
3100 AS="If !ublft!zpvs!txpse!boe!hb2t! 
bihpMe! ! !q jfdf Ipoluif idpuoufs/"' 
3120 I C36) -R : U5=H1 : UI=N1 : I CNll) =N0 ; GOT 
NIOOO 

3160 GOTO N67e0 
3205 IF R<>28 THEN 3228 
3210 GOSUB M5:IF CL=N10 AND V=M19 THEM 

GOTO 6780 
3215 A5="Zpv ! epo Cu! ibWf ! fopuhi ! fwjefod 
f=U":GOTO N10O0 
3220 GOTO N676e 
3245 IF V=45 AND 
u!uif!xjoepx///"; 

=Nl:GOTO NIOOO 

3260 GOTO N6760 

3300 IF R=43 AND Y=N5 AND KS 

Tif ISfUVSOt Izpws ! 1 jttft !X jui ! 

qbtt jpo/":GOTO NIOOO 

3320 IF R=43 AND Y=H5 THEN A$="TifCt!b 

iMjuuMf I tusqs jtfe-!cwu!sfuwsot ! zpus! 1 j 

tt/"!K5=Nl:G0T0 NIOOO 

3340 GOTO N6760 

3380 IF R031 OR CYOSl AND YON8J THE 

N 3540 

3400 IF CT+N20>TURN OR GD=N4 THEN A$=" 

Ui fz ! tbxizpulboe ! tupqqf elubMl joh/":GOT 

Niooe 

3415 GD=GD+Ml:IF GD>N3 THEN GD=N1 

3420 CT=TURN:IF GD=N1 THEN A$="C0p!pof 

!X jMHiCf ihvbse johiuif !qs JOdf tt C irvbsuf 

St !upO JhiU/ C" 

3440 IF GD=N2 THEN A$=" CUi f ! Sf h JtUSbS ! 

SfbMMZlMpwft! i jt!bHf/t" 

3460 IF GD=N3 THEN A$=" (J ! i f bs ! JlO jl ! 

sftqpoet ! xf MHiup !uif ! ! ! iqspn Jtf !pg!hpM 

e/C" 

3500 GOTO NlOOe 

3540 GOTO N6760 

3580 IF I(N13)<>-N1 OR N$ CNl, N4] <>"FOR 

E" THEN 3620 

3600 A$="Zpv!qvu ! b iCMbdl ! epu ! po ! zpvs ! 3 

psfifbe/";PT=Nl:GOTO NIOOO 

3620 GOTO N6760 

3700 IF RON12 OR Y<>43 THEN 3740 

3720 A$="Qsbzfs!boe!hppelef fetlbsf !uif 

!!!!!!!! ! t jodf Sf tu ! gpsn ! pg ! xpsti jq/" : G 

OTO NIOOO 

3740 IF R=N8 AND Y=N6 THEN ft$="0JN5BM( 

TiHSBDF! . . i31!MFBHUFT";G0T0 NIOOO 

3760 IF ICN10)<>-N1 OR YONIO THEN 382 



3780 IF PG=N1 THEN ftS="LJOH! !tj 

tf !23! !!!!!!!!!!!!!!!! IRVffo! !tj 

tf!9":G0TO NIOOO 

3800 IF PG=N2 THEN AS="EpMOps ! !tj 

*f !21! ! ! ! ! ! ! I ! ! ! ! ! ! ! ! ! iOJlOjl! !tj 

♦f !21"!CLCN3)=Nl:G0T0 N1O00 

3820 IF R=N16 AND Y=47 THEM A$="JU!tbZ 

t; !BMM!bOjnbMt!nvtu!Cf ! ! ! ! ! ! ! ! ! ISfhjtU 

fsfe! jnnfejbufMZ=":G0T0 MIOOO 

3840 IF Y=23 AND I(23)=-N1 THEN AS="Xb 

Udi rgpsiTMBHF! JJJ; !UIF!HPETI ! ! ! i ! ! ! ! UI 

FNTFMWFT/'":GOTO MIOOO 

3860 IF Y033 OR ICY)<>-N1 OR 5IL=N0 T 

HEN 3920 

3880 AS="Cpxxpx///'/'////////'<'LjOhCt!eph 

!!!!!!!! ! Upqqf S/'//'/////////'/EpMOps tt ! i 

pstf ! ! ! ! !":CL(N6)=N1 

3900 AS CLEN CA$) +N1) ="DbUO jq/////////// 

//RWffOCtlqbSblf fuU"!G05UB M3:? A$!A$= 

■■";G05UB NlliGOTO NIOOO 

3920 IF Y=22 AND I CY) =-Nl AND NB THEN 

fl$ = "Hfgofu! MM I ICpccfM! ! ! ! ! ! lEpwORS": 

CLCN7)=N1:G0T0 NIOOO 

3922 IF YON14 OR ICV)<>-N1 OR NOT DI 

A THEN 3928 



KR 3924 AS="J!ui jol !uif !1 joh! ibtlMfbSOfe! 

Uibu! ! ! ! ! tibMb! Jt ! opu ! USVnz ! i jt iebVhiU 

fS/! J! ! ! !gfbs!gps!ifs!Mjgf-" 
HL 3925 ASCLEH{A$)+NlJ="!bt!xfMM!bt!nz!px 

D/<l":GOTO NIOOO 
BJ 3928 IF Y<>39 OR ItY)<>-Nl OR MOT GR 

THEN 3931 
UM 3929 AS="B!CMbdl !epu!po!uif Igpsf ifbe! j 

tlgsf . ! ! !rvfouMz!wtfe!cz!uif IgpMMpxfst 

!pg! ! ! ! ! !HpMhp«pui !up" 
15 3930 AStLENCA$)+N13="! jefoujgz! fbdiipu 

ifS/+":GOTO N1000 
AM 3931 IF Y=N15 AND I tY) =-Nl THEN A5="Ui 

f I ruf fo! ibt ! cfusbzfeinf/! !J!xjnn!!!!ib 

Wf !nz!sfWfOhf=":G0T0 N1OO0 
LG 3940 GOTO N6760 

IV 3980 IF RON5 OR V<>28 THEM 4020 
UJ 4000 A$="Uif !XbUfsCt!tp!dpMe!zpw!kwnq! 

Sjhiu! ! ! !pvu=! ! Zpw ! boe ! Tibwb ! bSf ! tpbl f 

e=":HT=Nl:G0T0 NlOOO 
AH 4020 IF RON5 OR Y<>41 OR HOT HT THEM 

4060 
AX 4040 AS="Uif !XbUfS!ifMqfe!zpv!hfU!uisp 

Vhi=!]B! iMjUUMf !t jOhfe-lUip«hi/«";R=M7 

!UL=N1:G0T0 1000 
GT 4060 IF CR=N7 AND Y=41) OR CR=N5 AND V 

=41 AND NOT WT) THEN A$="Zpw twf ! C f f O ! 

CbSCfdUfe=U":G05UB N4!G0T0 7240 
RU 4100 IF R=24 AND Y=35 AND I CY) =-R THEN 

A$="PlbZ=":R=78:UL=Nl:G0T0 NIOOO 
KH 4102 IF R=34 AND V=53 AND NOT UML THE 

M A$="JUCt!Hpdlfe/":GOTO NIOOO 
UN 4104 IF R=34 AND Y=53 AND UNL THEN R=6 

5:UL=Nl:G0T0 NIOOO 
PM 4105 IF CR=23 OR R=21) AND CY=50 OR Y= 

N9 OR y=30 OR V=31) AND Dy<NO THEN A$= 

■' JU Ct ! dMpt f e ! gps ! U i f ! O Jh i U/" : GOTO 1000 
II 4106 IF R=N17 AMD CY=32 OR Y=52) ftND D 

Y<NO THEN A$="JuCt!dMptfe!gps!uif Jojhi 

U/";GOTO NIOOO 
BU 4110 IF R=23 AND Y=50 THEN R=77;UL=N1: 

GOTO NIOOO 
ZY 4111 IF R=23 AND CY=N9 OR y=30) THEN R 

=74:UL=Nl;G0T0 NIOOO 
VM 4112 IF R=21 AND CY=30 OR V=31) THEN R 

=75:UL=Nl:G0T0 NIOOO 
UE 4113 IF R=N17 AND Y=32 THEM R=76:UL=M1 

SGOTO NIOOO 
TG 4114 IF R=M17 AND V=52 THEN H=73 ; UL=N1 

:GOT0 NIOOO 
MQ 4115 IF R=39 AND Y=54 THEM ftS="Zpw ! tMf 

f q ! b ! Mpoh ! U jn f- ! Ui f ! Xb 1 f /U" ; GOSUB N4 : 

GOSUB 6500: A$="";GOTO NIOOO 
SH 4117 IF R=N8 AND V=59 THEN R=81;UL=Mli 

GOTO NIOOO 
KL 4120 GOTO N676e 
FD 4160 IF V=45 AND ICY)=-N1 THEM AS="Xib 

UCt!uibu!bxgVKl!ubtUfG! J Zpv Cwf ! C f f o!qp J 

tpofe=EJ": GOSUB M4:G0T0 7240 
LD 4180 GOTO N676e 
PZ 4220 IF R=N15 AND ICN5]<>-M1 AND Y=N8 

THEM A$="HfU!MptU-!tUSbOhfS=":G0T0 N10 

00 
LG 4240 IF R=N15 AND ICN5]=-N1 AMD V=N8 T 

HEN AS="Zpw! ibWf !uif !qsjOdftt=! !Dpnf ! j 

O=U":UL=Nl!R=N16;G0T0 N1000 
OS 4260 IF CR=75 AND Y=48) OR CR=73 AND Y 

=38) OR CR=28 AND V=27} OR CR=74 AND Y 

=N9) THEN A$="CZfteC":G0TO NIOOO 
BO 4280 IF R<>77 OR V<>44 THEN 4420 
EM 4300 IF ICN12)<>N0 THEN A$=" CZpv ! nvtU ! 

hp!opx-!cspuifS/C";GOTO NIOOO 
XQ 4320 IF PT=N0 THEM A$="If ! Uf MMt ! zpw ! up 

!hfu!HptU=":GOTO MIOOO 
GA 4340 ft$="(XibuCt!uif !qbttxpse-!cspuifs 

GC":GOSUB N3:? A$: A$="";INPUT PHS 
HG 4360 IF PW$="DARKME55" THEN AS="(IfSfC 

tluif ! lfz-!cspuifs/C";US=Nl:lCN12)=R;G 

OTO NIOOO 
BZ 4380 A$="If !hSbCt!b!txpse!boe!SVOt! ! ! ! 

! ! ! ■ i ! ! i !zpVlUispvhi=L|":GOSUB N4 : GOTO 

7240 
AO 4420 IF R<>43 OR VON5 THEN 4480 
ZB 4440 IF KS THEN A$=" CTpnf Ui joh ! tf f nt ! U 

piCf IcpuifSjOh! ! ! ! ! lEpMOps/! !If Ct!cf fo 

!bwpjejOh!nf/C"!CLCN3)=Nl!G0T0 NIOOO 
OR 4460 AS="Tif !tbZt-! CJ!bn!qMfbtfe!zpv! i 

bwf Idpnf ! up! Wjtjuinf !upo JhiU/ C"! GOTO N 

1000 
GX 4480 IF R=45 AND Y=N20 AND DY>N0 THEN 

A$="CUif ! 1 JOh!upMe!nf !up! If fqJbO! fZf !p 

o! ! ! !zpv///C":GOTO NIOOO 
FC 4482 IF R=41 AND V=N18 AND I CY) =-R THE 

N A$="(J! ifbselbiopjtf !boe!dbnf !up!efg 

foe! ! !uif !qsjOdftt/C";GOT0 NIOOO 
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MO 4484 IF CR=42 AND y=N19 AND DY>Ne) OR 

(R=40 AND Y=H18) THEN AS="If tt ! hpu ! OpU 

i jOh!up!tbZ/":G0T0 N180Q 
KH 4500 GOTO Ne760 
TL 4601 IF R=34 AND Y=N16 AND I C53] =N0 TH 

EN AS="UifSf Ct!b!epps!Cf i joe! ju=" : I t53 

}=-R:US=Nl:G0T0 NIOOO 
IQ 4604 IF R<>42 OR Y021 OR IC46}<>N8 TH 

EN 4620 
EL 4605 IF DY<NO THEN AS="Ui f Sf Ct ! tpn f Ui j 

Ohicfi joe! ju=":I(46)=-R:US=Hl:G0T0 NIO 

00 
FI 4605 AS="EpMOps!ZfMMt-! CHWbSet=! !BSSft 

U! ! ! ! ! ! ! ! Ui jt ! nbO= CU" : GOTO 6600 
KV 4620 GOTO N6760 
LM 4670 IF tR=40 AND Y=N18 AND ItY)=-R) 

R tR=46 AND Y=N173 OR tR=42 AND Y=N19) 

THEN A$="If !tbZt!opui jOh/":G0T0 NIOOO 

OM 4681 IF Y057 OR ItY3<>-Nl OR IC563<>- 

Nl THEN GOTO N6760 
55 4682 AS="Tpnf !qSjOUt!nbUdi !b!tfu! jo!ui 

f ! 1 jU/! ! ! !UifZCSf !EpM0psCt/";CLCN4)=Nl 

:G0T0 NIOOO 
KR 4700 GOTO N6760 
ZF 4740 IF (R=N6 OR R=N7) AND Y=24 THEN A 

S="Uif !USf ft!bSf !upp!cusofe/":GOTO NIO 

00 
LX 4745 GOTO N6760 

JE 4780 IF I(35)=Ne AND R=24 AND Y=49 AND 
IC34)=-N1 THEM AS="ZpW ! WOdpWf Sf e ! b ! US 

bq ! epps=" : I C35) =-R : U5=N1 : GOTO NIOOO 
KT 4800 GOTO N6760 
RR 4849 IF ICN10)<>-M1 OR N$<>"PAGE" THEN 

GOTO Ne760 
SP 4860 IF PG>N8 THEN AS="PlbZ- ! qbhf ! jt ! U 

WSOfe/";PG=PG+Nl:IF PG<N3 THEN GOTO Nl 

000 
EO 4880 IF PG=N3 THEN PG=NO : A$ (LEN (A$] +N1 

}="!Zpu!dMptfe!uif ! ! Cppl/" : GOTO NIOOO 
LH 4940 GOTO N6760 

UD 4989 IF R<>73 OR YON7 THEN 5020 
JR 5000 A$="Uif !nbO!btlt!Uif ! ipstf ttiobnf 

!boe! ! ! ! !uifo!nbSlt! jU ! jO ! b ! cppl/" : RG= 

Nl:G0T0 NIOOO 
KK 5029 GOTO N6760 
NK 5060 IF ICN7) THEN ? "Nothing happens. 

•■:G0TO NIOOO 
FR 5089 FOR K=N1 TO 175:50UND N0,K,N8,N6: 

SOUND N1,X+N2,N8,N6:SETC0L0R N2,N0,14: 

5ETC0L0R N2,N0,N0:NCXT X 
RU 5100 SOUND NO, NO, NO, NO : SOUND N1,N0,N0, 

NOrPOKE 710, N8 
PF 5120 ? "A voice says, "J CHRSC34) ;"Ask 

and receiwe";CHR$C34) ;"." 
RY 5149 ? ;? "ONE WORD :";: INPUT CS 

NQ 5160 IF cS="HORSE" THEN ? :? "Granted! 

":ItN7)=R:US=Nl:G0T0 NIOOO 
TK 5180 ? "YOU have no need for that!":GO 

TO NIOOO 
PY 5209 GRAPHICS N18JP05ITI0N N5,N2:P0KE 

712, Ni4:? «N6;"aEiaOB"! POSITION N3, 

N4!? aN6;"NIMRAL'S GRACE" 
YH 5229 FOR Y=N1 TO N4:F0R X=N14 TO NO ST 

EP -0.45;P0KE 712,X;S0UND N0,N20,X,N8: 

NEXT X : NEXT Y 
DH 5230 POSITION N1,N10:? «N6;"BY EQaYiEn 

KUnuC" 

UT 5249 SOUND NO, NO, NO, NO : GOSUB 5740 

FL 5269 GOSUB 5280 : GOTO 5340 

GF 5280 GRAPHICS NO : POKE 710, 48 ; DL=PEEK C5 

60)+256*PEEK(561)+N4:P0KE DL-N1,71:F0R 

X=2 TO 24 STEP N2:P0KE DL+X,N6:NEKT X 

JX 5309 POKE DL+N19,N6:P0KE DL+21 , N6 : POKE 

DL+23,N6!P0KE 82,N0:POKE 752, Nl 
EE 5329 POSITION N3,N0:? "NIMRAL ' S GRACE" 

iPOSITION N9,N13:RETURN 
GA 5340 POSITION N4,N1:? "The alarMS are 

ringing!":P05ITI0N 24, N2:? "You've res 

cued Princess Shala froM" 
QJ 5360 POSITION 2,4:? "the Slavers of Go 

igoloth, but you're":P05lTlON 22, N5:? 

"not safe yet! A host of savage war-" 
EQ 5380 POSITION N2,N7:? "riors is crossi 

ng the lake in hot":POSlTlON 22, N8:? " 

pursuit! " 
LE 5400 POSITION 4,10:? "AS you drag Shal 

a toward the cover": POSITION 22,11:? " 

of the forest, a cloaked figure steps" 
yp 5420 GOSUB 5720:G0SUB 5280 
KK 5440 POSITION N2,N1:? "froM the trees. 
A survivor f roM" :POSITION 22, N2:? "S 

hala's aMbushed caravan? You rush" 
AR 5460 POSITION 2,N4:? "forward with joy 

, not noticing the": POSITION 22, N5:? " 

odor of oil drifting on the air. The" 



"dark figure str 

":POSITION 22, N8: 

l-soaked brush," 

? "As a curtain o 

POSITION 22, Nil 

of the city of" 

5280 

"NiMral's Grace 
■ ■ 

"A traitor frow 
u" 

"realize that th 
s" 

"planned, that s 
t" 

"of the way.":PO 
lavers, worshippe 

? "Golgoloth, are 
II 

? "boats. An inf 
II 

5280 

"Great Ninral pr 
24, N2:? "How will 
the" 

cloaked assassi 

":P0SITI0H 22, M5: 

ding? Can you" 

"solve the wyste 
n":P05ITI0N 22, N8 
low? You Must!" 

? " ■<!l=»=Mm:Hl!;l=< 
GOSUB 5720: POKE 8 

? "press any key" 

GET «N1,A:CL0SE O 
NEXT X:RETURN 

? " one Monent 



HQ 5480 POSITION N2,N7;? 

ikes a natch and tos- 

? "ses it into the oi 
QE 5500 POSITION N2,N10 

f flane leaps up, you 

:? "see the insignia 

UR 5520 GOSUB 5720 : GOSUB 
KT 5540 POSITION N2,N1:? 

on the figure's cloak 
UJ 5550 POSITION 22, N2:? 

Shala's hoMe city? Yo 
MK 5560 POSITION N2,N4:? 

e caravan's anbush wa 

BD 5570 POSITION 22, N5:? 

OHeone wants Shala ou 

PG 5580 POSITION N2,N7:? 
SITION 24, N8:? "The S 

rs of foul" 

JX 5600 POSITION N2,Nie: 

claMoring into their 

UD 5610 POSITION 22, Nil 

erno blocks your path 
UT 5620 GOSUB 5720;G0SUB 
RH 5640 POSITION N4,N1:? 

otect you!":P05lTlON 
you escape? Mho is 
BN 5660 POSITION N2,N4:? 

n? Who wants to keep 
? "Shala froM her wed 
EA 5680 POSITION N2,N7;? 
ry before the assassi 
:? "strikes a fatal b 

LY 5700 POSITION 23, Ni l: 

2,N2:G0T0 5760 
DU 5720 POSITION N3,N14: 

:OPEN »N1,N4,N0,"K:": 

Nl:RETURN 
FF 5740 FOR X=N1 TO 200: 
TR 5760 POSITION N3,N14: 

II 

OM 5780 DIM UB$ (NUKN4} , 1$ (NNWSZ) , A$ (160) , 

DT$CN8] ,H$tN12} , IN$ (N16} , U$ CNIO] ,N$CN1 

0) ,C5CN5) ,U$tN193 , CCS £773 , D$ t37) 
HP 5800 DIM NN$(NNWN43 ,I(NN3 ,E$C783 ,CL$C4 

23 ,UtNU3 ,PM$(N83 , L$ (353 
DT 5810 DIM 0$CN163 ,CLCN103 
JR 5815 FOR X=N1 TO NIO : CL (X) =N0 ; NEXT X 
HM 5900 0S="PlbZ-! jUCt!pqfO/" 
YM 5960 UB$(N1,803="EXAML00KTAKEGET DROPG 

IVE0PENUNL0TASTPAMNACCUP0URKISSLI5TPAI 

NREADGO ENTEDRINTALK" 
YB 5980 UBS C8i, 1043 ="MOVEFIHGCLIMDIG TURN 

REGI" 
YI 6000 NN$(N1,923="AMULB0X F00T5TAT5HALS 

IGNMHITGUARSHOEBLUESWORKEY PAINDIARPAP 

ETHROKINGNIKNDOLNDOMNWARDNOTELETT" 
HL 6020 NNSt93,1843="TREESTAIBR0WPEACLAKE 

DIRTSHOPPAWNSTABSILUSHOUTRAPGOLDSADDRE 

GIGRAYALE FIRESLAUPLAQPRIEWINEALTA" 
DS 6040 NN$tl85,2363="PR0CATTEGARDCHAPG0S 

SOFFISTEEBED CHAIKIT TANK50LDTENT" 
DZ 6060 IS{N13=" ":ISCNN*SZ3=" ":ISCN23=I 

S;GOTO 900 
AU 6100 DATA 1,1,2,2,3,3,4,5,6,7,8,9,19,1 

1,12,13,14,14,15,16,17,18,19,20,21,22 
JF 6120 DATA AMULET, 7 , JEWEL BOX, 42 , FOOTPR 

INTS,0, STATUE OF NIMRAL, -12, PRINCESS S 

HALA,5,SIGN,-8,WHITE HORSE, 
EB 6140 DATA GUARD, -15 , SHOEMAKER, -74, BLUE 
BOOK, 74, SWORD, -1, KEY, 0, BLACK PAINT, 35 

, DIARY, 53 
UN 6168 DATA PAPER, 46, THRONE, -34, KING, -46 

,NIKNIK THE JESTOR, -40, DOLNOR, -42, DCMN 

IS, -45 
AU 6180 DATA WARDROBE, -42 , NOTEBOOK , 72, LET 

TER, 78, TREES, 0, STAIRS, 0, BROWN HORSE, -7 

6, ROYAL PEACEKEEPER, -28, LAKE, -5 
ER 6200 DATA DIRT, -9, SHOEMAKER ' S SHOP, -23 

,PAWN SHOP, -21, ROYAL STABLES, -17, 5ILUE 

R BOOK,0 
YI 6220 DATA SHOUEL, 76, TRAP DOOR, 0, GOLD P 

lECE, 0,S ADDLE, 0, REGISTRAR, -73, GRAY BOO 

K, 54, BOTTLE OF ALE, 32 
AK 6240 DATA FIRE, , SLAUERS, -5, PLAQUE, , P 

RIEST, -77, TANKARD OF WINE, 39, ALTAR IN 

WALL, 0, PROCLAMATION, -16 
PD 6260 DATA SHOP ATTENDANT, -75, GARDEN, O, 

SMALL CHAPEL, -23, GOSSIPING GUARDS, -31, 

SMALL OFFICE, -17, STEEL DOOR,0 
JW 6270 DATA BED , -39 , CHAIN MAIL, 31, FINGER 

PRINT KIT, 52, EMPTY TANKARD, O, DEAD SOL 

DIER,-80,TENT,-8 
ZL 6280 GRAPHICS N0:POKE 559,N0:P0KE 703, 

4:DL = PEEKC5603+256»*PEEKC5613+N4:P0KE D 
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ux 

PE 
HB 
MK 

HU 
IC 



JSITIOM N1,H0:? «N6!"HiHf:l*«ii:H ": 
JN H1,H4!? »H6;" fZnTM.lJJ1" 

35ITI0N Hi,Ni8:? «NTi2saaaEjiB 



'' L+M28,13e 

LV 6300 RESTORE 6328 : FOR X=NO TO H19:REfiD 

ftlPOKE 1664+X,ft:MEXT X 
KJ 6320 DfiTft 72,138,72,169,192,162,10,141 

,10,212,141,24,208,142,23,208,104,170, 

104,64 
RG 6340 POKE 512,128;P0KE 513,N6:P0KE 542 

86,192:P0KE 709,N0:P0KE 710,N8:POKE 71 

2,112:P0KE 752, Ml 
FI 6360 POSITION 

POSITION 

6380 POSIT] 

H": POSIT] 

6400 POKE 559,34:IF DY<N0 THEN POKE 70 

9,12;P0KE 718, NO 

6428 IF FLAG THEN UL=N1 : UI=N1 :GOTO NIO 

00 

6448 R=N5:MT=N8iENT=N8:DD=N0:DY=Nl!CNT 

=NO!PT=N0:UNL=Ne:NB=N0:DIA=NO:GR=NO!NK 

=N0:5H=N0 

6445 CY=N0 : SE=N0 I RG=NO : PG=NO ; SIL=Ne : KS 

=NO:CT=N0:GD=Ne 

6460 TURN=Nl:UL=Nl:UI=Nl:A$="" 
NZ 6480 GOTO lOOO 
FH 6500 DY=-DY:IF DV<N0 THEM POKE 709, N12 

SPOKE 710,N0:lSt343,3573="SLEEPING DOL 

N0R":fl$="0jhiu!ibt!gbMMfO/" 
KH 6505 IF DY<NO THEN 1$ £305, 3175 ="5LEEPI 

MG K1NG":ISC362,376)="5LEEPIHG DOMNIS" 
OL 6520 IF DY>N0 THEM POKE 709,N0:P0KE 71 

0,H8:lSt343,357)="D0LN0R " : ftS= 

"EbZMjhiu! ibtlsfuwsofe/" 
ZI 6525 IF DY>MO THEN 15 t305, 3173 ="KIMG 

";ISC362,376)="D0MNIS " 

6540 GOSUB N3:? A$ : A$="" : RETURN 

6560 AS="Uif !hUbset!CWStu! jO=! !Zpu! !ib 

wf ! ! ! ! ! ! Idpnqspn jtfeiuif Iqs jodftticz!c 

f Job ! ! ! ! idbvhiu i JO ! i f S ! sppn=U" 
6600 GOSUB N4: A$="Zpv(Sf iuispxo! joupik 
bj«=":G05UB N3i? A$ ; A$="" : R=29 ! UL=N1 I G 
OTO NIOOO 
BK 6640 A$="TveefOMZ-!zpw!tff itpnfpof !UiS 
pwhi !uif icbst/! ! IF ! Uispxt I tpnf Ui johibu 
!zpw-!boe ju! i jut !zpv! jo ! Ui f ! Of dl=U" 
6660 GOSUB 6700:A$="Bt!Uif iebSUCtlqpjt 
poixpslt ! jut !xbz ! ! ! ! joupizpvs! tztufn-! 
zpylsfdphojtf ! MM! !zpus!bUUbdlfS/U" 
6688 GOSUB 6708 ! AS=" (Zpv= (- ! zpw ! tdsf bn 
/! (Ju!dbO(u!cf !zpu=CU":GOSUB 67e0:G0T0 

7240 
6700 GOSUB N4iRETURN 
6720 IF R=29 THEN GOTO N10OO 
6738 A$='"TweefOMZ-!hUbSet!bqqfbS!boe!h 
sbq!zpw-!zfMMjoh !tpnfUijOh!bcpvu!opu!s 
fhjtUfS. ! johizpvs! ipstf=U":GOTO 6600 

6741 IF R=29 THEN GOTO N1O0O 

6742 A$="TveefOMZ!hVbset!bqqfbs!bOe!hS 
be !zpw=! ! Tpnfpof ! upne ! ui fn!bcpvu!zpvs! 
wjtju! ! ! !up!TibMb tt ! Cf esppn^U" 

6743 GOTO 6600 

6744 A$="Zpv(Sf !upp!HbUf=!Uif itMbWfSt! 
ibwf ! ! ! ! !sfbdife!zpu=U":GOSUB N4:G0T0 
7240 
6760 ? "YOU CAN'T DO THAT!":GOTO llOO 

6780 GRAPHICS NO : POKE 710,MO:POKE 709, 
N10:POKE 752,Ml:P0SITI0N N2,N2 

6781 ? "Based on the evidence you've d 
ered the assassin has been app 



UH 
CO 



LR 



HB 



KD 



BQ 
XE 
AJ 



XO 
FM 



TC 
HU 



PZ 
KS 



XB 



MT 



TH 



iscow- 
re-" 

6782 ? 

a lot 
n now" 

6783 ? 

have 

n" 
ZA 6784 ? 

the 

to" 
EZ 6785 ? 

S Of 

Hself . 

6786 ? 
, but 
the" 

6787 ? 

1 ive 
e" 

6788 ? 
nture 
oad." 

6789 POSITION 
ITIO N N4,22;? 

6790 GOTO 6790 
6820 TRAP 7040 



"bended. Unfortunately he had 
of accoHplices and they're eve 



"coMbing the city for you, 
to leave the city Cand a 



You 
broke 



"hearted Shala) 
only being who 



and search out 
can put an end 



RM 



HK 



HD 



OE 



YE 
OL 



"the activities of the follower 
Golgoloth, the diety NiHral hi 

"It will be a dangerous Mission 
you Must succeed if Shala and 

"rest of the world are ever to 
in peace. The city gates clos 

"behind you, and your next adve 
is only a few steps down the r 

M14,20:? "Watch for":POS 



SLAVE III: THE GODS THE 



FP 6840 ? "LOAD FROM QAPE OR QISK"; ! INPUT 

ASSIF fl5="D" THEN 6900 
YP 6860 IF AS<>"T" THEN ? ! GOTO 6820 
JK 6880 ? :? "CUE TAPE THEN PRESS RETURN 

TWICE. ":INPUT A$:0PEN «N1, N4, NO, "C : " ! G 

OTO 6920 
GY 6900 OPEN HNl, N4, NO , "D : SLAVE2 . DAT" : A5= 

■ 111 

IR 6920 INPUT ttNl, R, CY, PG, WT, TURN, ENT, DD, 

DY,RM 
MB 6940 INPUT ttNl, CNT, SIL, PT, KS, GD , CT, RG 
RT 6950 INPUT »N1, UNL, NB, DIA, GR, SH, NK, SE 
BK 6951 FOR X=N1 TO MIO : INPUT nNl,A:CL(X] 

=A:NEXT X 
NQ 6960 FOR X=N1 TO NN*SZ STEP 5Z : INPUT « 

l,U5!l$tX,X+SZ-Nl)=U$:NEXT X 
EE 6980 FOR X=N1 TO NN:IMPUT SN1,A:ICX]=A 

. NEXT X 
XL 7080 IF DY<N0 THEN POKE 7e9,N12:PDKE 7 

1O,N0:GOTO 7020 
DB 7010 POKE 7O9,N0:POKE 718, NB 
FB 7020 CLOSE MNl ! UL=N1 : UI=N1 : ? :? : TRAP 

1260:G0T0 N10OO 
GJ 7040 ? :? "NO GAME DATA SAUED!":END 
LB 7060 ? "SAUE TO QAPE OR QlSK"; : INPUT A 

S;IF AS="D" then AS=",":G0T0 7128 
NH 7080 IF A$<>"T" THEN 7060 
NS 7100 ? :? "CUE TAPE THEN PRESS RETURN 

TWICE. ";INPUT A$!AS=",":OPEN ttNl, N8, NO 

,"C;";GOTO 7140 
NH 7120 OPEN »N1,N8,N0,"D:SLAUE2.DAT" 

KW 7140 ? «ni;r;a$:cy;aSjPG;AS;WT;AS;turn 

;A$;ent;A$;DD;aS:DY;a$;rm 
IW 7160 ? ttNl;CNT;AS;SlL;A$;PT;A$;KS;A$;G 

D;A$jCT;A$jRG 
HE 7170 ? »Nl;UNL;A$;NB;A5;DIA;A$;GR;A$;S 

h;a$;nk;a$;se 

NJ 7171 FOR X=M1 TO N10:? ttNl, CL CX] : NEXT 

X 
GM 7180 FOR X=N1 TO NN*SZ STEP SZ : US=lS CX 

,X+SZ-N1) : PRINT ttNl;U$:NEXT X 
GR 7200 FOR X=N1 TO NN:PRIMT ttNl;I(X}:NEX 

T X 

FE 7220 CLOSE ttNl!? :? : AS = GOTO 1188 

BA 72 48 GRAPHICS N17!P0SITI0M M4,H4:? »H6 

! " LfillU:<^i]=fnilJ " ! POSITION N3,N8:? ttN6;" 

DO YOU WANT TO" 
OU 7260 POSITION N2,Nie:? ttN6;"PLAY AGAIN 

? cn/ffl) " 

YN 7268 GOSUB M11:IF A=ASC t"Y") THEN RUN 
EZ 7300 END 
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ow many of you 
have ever played 
a computer ad- 
venture game of 
some sort? I see 
a lot of hands in the air. (Great 
eyes, no?) And if you've ever 
tried to write one yourself, 
you quickly discovered that 
even a simple adventure 
game involves some pretty 
sophisticated programming. 
The ever-adventurous Clay- 
ton Walnum once wrote an 
insightful three-part series on 
how to design and program 
your own adventure games. 



Blow the cobwebs off issues 39, 40 and 41 
of ANALOG Computing, from early 1986, 
and re-read what Clayton had to say. It's okay, 
I'll wait here until you're done. 

Back already? Then you've learned many 
things (or else you were watching Dallas re- 
runs while you were supposed to be studying). 



Clayton's articles told you (among other use- 
ful stuff) that the heart of an adventure game 
is its "parser." The parser is the program code 
that lets the computer interpret commands you 
type and take some appropriate action. It is the 
parser that gives the computer some appear- 
ance of being intelligent. Of course, computers 
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aren't intelligent in the least; good parser 
programmers are. 

In reality, parsers are useful for much 
more than simply exploring dungeons. 
Many kinds of computer applications can 
benefit from a user interface that at least 
attempts to understand natural language 
communications. While it's pretty hard to 
get a computer to understand spoken in- 
structions, the written word can be inter- 
preted a bit more easily. 

In the next Boot Camp or two, we'll see 
how a very simple parser can be im- 
plemented on the 8-bit Atari, using some 
assembly language for the time-intensive 
parts. You really aren't likely to write a 
complete application program in assembler 
around this word-searcher nucleus. Hence, 
we'll set up a simple BASIC program struc- 
ture that interfaces to the machine-language 
parser routine, to show you how it all fits 
together. 

Now, what subject area should we use 
to illustrate the fine art of parsing? Adven- 
ture games are kind of passe by now. Wait! 
I've got it! Imagine the kitchen of the fu- 
ture, automatically assembling ingredients 
in the quantities and sequence you speci- 
fy, popping the result into the oven, and do- 
ing everything for you except eating the 
food. Let's write a general-purpose parser 
in assembly language, then cook up a BAS- 
IC program that might be used someday in 
Karl's Komputerized Kitchen. 

The joy of parsing 

There are three main aspects to a natural 
language-processing program or parser: 1) to 
take the input string apart into separate words 
and/or numbers, 2) to attempt to identify the 
individual words by looking them up in a 
vocabulary list, and 3) to try to understand 
what the input "means"; that is, see if the 
words identified in the input string constitute 
a recognizable instruction that can be execut- 
ed by the program. 

Let's look at all three of these functions in 
more detail. 

Dissecting the input 

The basic idea of natural language process- 
ing is that the user (who is presumably a hu- 
man being of some sort) can present 
instructions or queries to the computer much 
as he would communicate with another hu- 
man being. I'm sure you recognize how 
amazingly complex this kind of communica- 
tion really is. After all, you use all sorts of 
shortcuts in your verbal and written commu- 



nications, yet other people who know the 
same language can usually figure out what 
you're trying to say. We have to be pretty crea- 
tive to do something similar with a 
microcomputer. 

Take a simple instruction of the sort you 
might give to a computerized kitchen when 
you want to bake a cake: "Slowly mix in two 
cups of brown sugar." Most of you should 
have a picture in your mind of what this 
means. But how do we get the computer to 
understand it? 

The first step is to break the input string 
into separate words. The simplest way to do 
this is to look for blank characters as 
delimiters between words. But what if the 
program user entered more than one blank 
between words, or used a punctuation mark 
(comma, semicolon, period, etc.) to separate 
words instead of (or in addition to) the blank? 
For simplicity, we'll decree that only single 
instructions can be entered. This means we 
don't have to look for complex sentences such 
as, "Melt the butter, then stir in the flour." 
So, most punctuation marks can be dis- 
regarded. 

However, we can't just ignore periods. 
What if you want to add 3.5 cups of flour? 
The period here is really a decimal point in 
a number. Obviously, when we split the in- 
put string into words, we must distinguish 
numbers from true words that we'll be try- 
ing to find in the vocabulary list. 

The moral of the story is that the natural 
language interface involves some 
"preprocessing" of the user's input. This step 
discards symbols like certain punctuation 
marks and builds a list of words for which 
we must search in the known vocabulary. Any 
numbers or other anticipated special charac- 
ter strings will be identified and set aside until 
we get to Step 3, in which we try to make 
some sense out of the input. 

The preprocessor can be a part of the pars- 
er code itself or it can be a separate routine. 
For simplicity in this example, I'll put the 
preprocessor into the BASIC program. If ex- 
ecution time is critical, you would want to 
recode it into assembler, but BASIC will be 
fine for our purposes. 



Do I know you? 



Once your preprocessing step has come up 
with a list of words from the user's input 
string, we need to see if the words are 
"known" to the program. Your vocabulary 
list should be separate from the parser code 
itself, since a general-purpose parser routine 
could then be used for many applications hav- 
ing different vocabularies. The limited RAM 



BOOT 
CAMP 



In reality, parsers are useful 

for much more than simply 

exploring dungeons. 
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You have to consider how 

much latitude you wish to 

give the user regarding 

different ways to enter 

equivalent commands. 



in 8-bit microcomputers can really restrict the 
size of the vocabulary in a given program, 
because you still need some memory for the 
rest of the program. 

The simplest approach is to put all the 
words you want the program to recognize into 
the vocabulary list. Some alternative tech- 
niques provide more efficient use of memory, 
thus allowing larger vocabularies. Have you 
ever noticed that some spelling-checker pro- 
grams appear to require far less memory than 
it seems like they need to handle; say, 30,000 
words? Data compression methods and clever 
algorithms can be used to substantially reduce 
the amount of memory consumed by a block 
of information. However, we'll leave such 
techniques to the experts and stick to the brute 
force approach. 

Another consideration is how much lati- 
tude you wish to give the user regarding 
different ways he can enter equivalent com- 
mands. For example, do you wish to distin- 
guish between uppercase and lowercase 
letters? This can be important for proper 
names, like in a quiz on U.S. presidents. Do 
you want the user to be able to get away with 
a certain degree of misspelling? One way to 
handle this is to add anticipated misspellings 
of particular words to the vocabulary. A more 
sophisticated approach uses some algorithm 
to determine just how closely words must 
match vocabulary entries to be considered ac- 
ceptable. 

In today's example, we'll translate all lower- 
case letters to uppercase, and the vocabulary 
entries will all be in uppercase. Only exact 
matches with vocabulary entries will be ac- 
cepted. 

Yet another one of many characteristics of 
human, that is, interpersonal communication 
is that we tend to be more or less, I mean 
pretty much, wordy lots of the time, you 
know? Think back to "slowly mix in two cups 
of brown sugar." The words "in" and "of" 
certainly are superfluous to the meaning of 
this instruction. Prepositions and articles (a, 
an, the) can generally be ignored without dis- 
turbing the meaning of an instruction. Hence, 
we'll leave them out of the vocabulary. A 
word of warning: Be very careful with nega- 
tion words like "not" and "don't." "Don't 
boil the milk" is rather different from "boil 
the milk"! 

How about words like "slowly" and 
"brown"? Adjectives and adverbs like these 
can be important, but not necessarily. The 
specific application dictates whether the ac- 
tions to be taken depend on the presence of 
modifiers like these in the command string. 

Another important aspect of building a 
vocabulary is the handling of synonyms. In- 



structions to "add flour" and "add sugar" are 
obviously different. But are there differences 
between "add sugar," "mix sugar," "stir su- 
gar," "beat sugar," "fold sugar" and so on? 
If not, these instructions are all equivalent. 
So, even though our parser has to locate the 
verb (add, mix, etc.) in the vocabulary, only 
one piece of program logic is required to han- 
dle all these inputs. 



A token gesture 



Okay, so we've split the input string into 
words and found the words in the vocabulary 
list. Each word is assigned a numeric value, 
or "token." Each category of vocabulary en- 
tries will have a different set of tokens, and 
specific arrangements of tokens will make up 
valid instructions. Synonyms are given the 
same token. 

Listing 1 illustrates what I mean. This is 
an Atari BASIC program that creates the 
vocabulary file (VOCAB.DAT) for our com- 
puterized kitchen example. You can modify 
this program to create vocabulary files for 
other applications by changing the DATA 
statements in Lines 1000-1120. The DIM 
statements in Line 100 limit the length of a 
single vocabulary entry to 20 characters and 
the total length of the vocabulary file to 2,000 
bytes, but of course you could change these 
restrictions. 

The first block of vocabulary words (Lines 
1000-1030) pertains to ingredients that we 
think someone might want to use in describ- 
ing a recipe. FLOUR is assigned the token 
1, SUGAR is 2 and so on. Notice that I'm 
regarding BUTTER, MARGARINE and 
SHORTENING as equivalent ingredients, so 
they all are given the same token, a 5 (Line 
1010). In the adventure game sense, these 
words correspond to the nouns that could be 
entered in a simple two- word command. 

Another section of our vocabulary con- 
cerns operations (verbs) the user might want 
to perform while cooking up something tasty. 
All of these have tokens in the range 20-29 
(Lines 1040-1060). Again, some of them are 
considered to be synonymous (MIX, STIR, 
ADD, FOLD), and instructions containing 
any of these words will be handled in exact- 
ly the same way by the evaluator part of the 
parser. 

Vocabulary words with tokens in the 30-39 
range refer to the units on some meaningful 
numbers that could be part of a command. 
These units refer to cooking time (HOURS, 
MINUTES) or temperature (DEGREES). 
Words with tokens in the 40s are units per- 
taining to the quantities of ingredients that are 
to be added (CUPS, TSP and so forth). 



SB 
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When we actually get to the part of the 
parser that determines whether a valid in- 
struction was entered, the program will be 
looking at tokens, not at actual words. Cer- 
tain patterns of tokens constitute valid com- 
mands. For example, suppose the instruction 
string entered said, "ADD 2 COCOA." The 
parser would tokenize this into ingredient = 
8, amount = 2 (identified as a number), and 
operation = 21. However, the parser logic 
should recognize that something is missing: 
units. 'ADD 2 what COCOA?" Cups? 
Ounces? Tablespoons? It makes a difference 
in the final product, or so I've heard. Hence, 
"ADD 2 COCOA" would be flagged as an in- 
valid instruction, because no units were 
specified. More about the third portion of the 
parser next time. 

Vocabulary building 

Enough preliminaries; let's look at some 
more code! I said that Listing 1 is a utility 
program for creating a file containing a 
vocabulary list. The entire vocabulary list is 
treated as one giant character string variable, 
VOCAB$. For convenience of editing and for 
ease of reading the file, the contents of the 
string are written out to the VOCAB.DAT file 
in 40-byte records, in Lines 220-300. 

The data statements in Listing 1 contain the 
individual vocabulary entries and their cor- 
responding tokens. A complete vocabulary 
entry in string VOCAB$ consists of: one 
character whose ATASCII value equals the 
number of characters in the word (Lines 
130-140); the word itself (Line 150); and a 
character whose ATASCII value equals the 
token value for that word (Line 160). This 
method for storing the vocabulary limits you 
to 255 unique tokens, but if you needed more, 
you could go to a two-byte representation for 
the tokens; 65,535 tokens should be adequate. 

An example: MARGARINE has a length 
of nine characters and a token value of 5. The 
vocabulary entry for this word consists of 
CHR$(9) (Control-I), MARGARINE and 
CHR$(5) (Control-E). Make sense? 

Line 1130 marks the end of the vocabulary 
data with an exclamation mark and a token 
value of 0. If the vocabulary searching part 
of the parser gets to the end of the vocabu- 
lary list without a match, a token of is 
returned. 



The word quest 



Next month we'll look at the preprocess- 
ing and evaluator parts of the parser For now, 
you'll have to settle for something simpler. 
Listing 2 is a BASIC program that simply 



loads the word-finder machine-language pars- 
er routine into RAM, reads the VOCAB.DAT 
file into string variable VOCAB$, lets you 
enter a word at the keyboard, and tells you 
if the word you entered is found in the 
vocabulary list. (Enter QUIT to exit.) This 
is a useful way to test whether there are any 
errors in your vocabulary file. For today, List- 
ing 2 will serve as a framework for illustrat- 
ing how the machine-language routine 
operates. 

Line 40 of Lisfing 2 DIMs the VOCAB$ 
variable to the actual length of the vocabu- 
lary file or thereabouts. The 40-byte records 
from VOCAB.DAT are read in Lines 140-190. 

Oh, yeah, I almost forgot: Boot Camp is 
supposed to be about 6502 assembly lan- 
guage. Well, look at Listing 3. This is the ker- 
nel of the parser, the routine that searches for 
a particular word in the vocabulary file. It 
produces only 79 bytes of object code. Short- 
er than you expected, eh? Well, it really isn't 
doing anything particularly fancy. Of course, 
if you were to write the entire preprocessor 
and evaluator parts of the parser in assem- 
bly language, you'd be talking about some 
serious code. The preprocessor could be 
written so as to be generally useful in any 
natural language program. However, the 
evaluation code is necessarily specific to each 
application. 

The machine-language roudne in Listing 
3 is intended to be called from BASIC by 
means of the USR function. It is relocatable, 
so it can be loaded at any address you like. 
Assemble this listing and create a disk file 
called R\RSER.OBJ. 

Listing 2 reads the machine-language code 
from PARSER.OBJ. You may recall that bi- 
nary (object code) files contain six bytes of 
header information. Lines 60-80 of Listing 
2 read these six bytes and throw them away. 
Lines 90-120 read the actual object code and 
load it into a string variable called ML$. An 
alternative approach is to read the object code 
and poke it into some safe place in RAM. 
Since the code is relocatable, this can be se- 
cure anywhere, so long as you know the start- 
ing address. 

The assembly routine uses six RAM loca- 
tions for specific purposes. Zero-page bytes 
$CB-$CE (decimal 203-206) are needed for 
the indirect indexed addressing mode, as we 
have seen so many times before. Location 
$6FE (decimal 1790) contains the length of 
the word being sought in the vocabulary; this 
serves as input into the machine-language 
routine. Location $6FF (1791) contains the 
word's token value (or a zero if not found); 
this is the parser's output. You can change 
these if they conflict with other uses for those 
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If you were to write the 

entire preprocessor and 

evaluator parts of tiie parser 

In assembly language, you'd 

be tall(ing about some 

serious code. 
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It's not a bad idea to do 

some error checking to 

mai(e sure tliat tiie 

acGumuiator contains a "2" 

after tiie PLA operation. 



addresses in your own programs. 

To call this machine-language routine, first 
poke the length of the target word (in varia- 
ble WORDS in Listing 2) into location 1790 
(Line 240 of Listing 2). Then call the 
machine-language routine with the USR 
function as shown in Line 250, specifying the 
addresses of the ML routine itself, the 
vocabulary variable string, and the target- 
word variable string. Faster than a speeding 
bullet, the token value for the word appears 
at Address 1791, unless the contents of 
WORDS aren't found in VOCAB$, in which 
case a zero appears in address 1791. Pretty 
simple, eh? 

Let's look at the assembly code a little 
more closely. Lines 450-530 in Listing 3 il- 
lustrate how to handle arguments passed from 
BASIC to machine language. These, you may 
recall, are passed via the stack, in two-byte 
chunks. The PLA in Line 450 removes a one- 
byte counter of how many arguments were ac- 
tually passed. It's not a bad idea to do some 
error checking to make sure that the accumu- 
lator contains a "2" after the PLA operation; 
otherwise, a computer lockup is likely. Next 
on the stack are the high byte and low byte 
of Argument 1 (address of VOCAB$), fol- 
lowed by the high byte and low byte of Ar- 
gument 2 (address of WORDS). 

The searching algorithm is really very sim- 
ple. It begins by comparing the length of the 
target word to the length of the current 
vocabulary entry being pointed to by VOCAB 
(Lines 680-700, with a branch down to Line 
790). If the lengths are different, the words 
obviously don't match, so control passes from 



Line 810 to label NEXTWORD at Line 1090. 
Lines 1100-1320 simply change the contents 
of VOCAB to point to the next word in 
VOCABS, by skipping ahead a number of 
bytes equal to the length of the current word 
plus 2 (one for the length, one for the token). 
If the target length did match the current 
vocabulary entry length, a character-by- 
character comparison is done in Lines 
820-960. This comparison actually starts with 
the last character in the word and works back- 
wards. If all characters match {Ta-da\), we 
have a hit. Lines 970-1010 fetch the token 
value at the end of the current vocabulary en- 
try, store it at address RESULT ($6FF, 1791), 
and return to the BASIC program. If the en- 
tire vocabulary list is searched with no match, 
RESULT contains a zero (Line 710). 

Conclusion 

So there you have it. A very simple 
assembly-language program for searching an 
arbitrary list of vocabulary entries to see if 
a target character string can be identified. 
Next time, we'll see a way to package this 
vocabulary searching part of the parser with 
preprocessor and evaluator routines in BAS- 
IC to show just how smart a program has to 
be to make Karl's Komputerized Kitchen a 
reality. 

Acknowledgement 

I'm indebted to Dr. Bruce Argyle of Mad 
Scientist Software for sharing his parser code 
and concepts with me. Thanks, Bruce. 



Listing V. BASIC 



IE 10 
6T 20 
FL 30 
ZM 40 
BC 50 
DD 60 
BE 70 
KD 80 
6G 30 
BV 100 

1} 
YU 110 
Z5 120 
ft5 130 
IK 140 
MO 150 
OD 160 

OKE 
ftZ 170 
YG 180 
MU 190 
DU 200 
PB 210 
BU 220 
HM 230 



REM PrograM 
REM Utility 
REM VDcabula 
REM dCMO pro 
REM 

REM by Karl 
REM 

REM First bU 
REM 
DIM TERMS C2 

A=l:PRINT " 
READ TERMS, 
IKLEH=:LEHCT 
UOCABSCA, A) 
y0CAB$tA+l, 
yOCABStA+l+ 

IF TERMS="! 
A=A+INLEN+2 
GOTO 120 
REM Then pr 
PRINT "'5ayi 
OPEN tt2,8,0 
MAK=INTtLEN 



nane: UOCAB.BAS 
prograM to build 
ry list file for parser 
graM in "Boot Cawp" 

E. Miegers 

ild U0CAB5 String 

OJ ,yoCAB$C20OO) ,TEMP$C4 

Building vocabulary..." 

TOKEN 

ERMSJ 

ZCHR5CINLEN) 

A+INLEN)=TERMS 

INLEN, A+1+INLEM)=CHR$CT 

THEN GOTO 200 



int data to file 
ng in f ile. . . ." 
,"D:U0CAB.DflT" 
tU0CAB$)/41)+l 



iJQ 240 
LM 250 
HY 260 
GG 270 
KG 280 

} 
KE 290 
LL 300 
KM 310 
NM 320 
EC 1000 
AP 1010 

ING, 
AF 1020 
HU 1030 
ZC 1040 

1 
SB 1050 
JR 1060 
AI 1070 

32 
IV 1080 
BO 1090 

,42, 
ZK 1100 
UK 1110 
PM 1120 

i44 
VF 1130 



FOR 1=1 TO MAK-1 

TEMP$=V0CABS {40»I-39, 40»I) 

PRINT «2;TEMP$ 

NEKT I 

TEMPS=U0CAB$C40«MAK-39,LENfU0CABSJ 

PRINT «2; TEMPS 

CLOSE tt2 

PRINT "All done!" 

END 

DATA FLOUR, 1, SUGAR, 2, OIL, 3, MILK, 4 

DATA BUTTER, 5, MARGARINE, 5, SHORTEN 
5 

DATA NUTS, 6, WATER, 7, COCOA, 8 

DATA EGG, 10, EGGS, 10 

DATA MIK, 21, STIR, 21, FOLD, 21, ADD, 2 

DATA WHIP, 22, BEAT, 22 

DATA PREHEAT, 23, COOK, 24, BAKE, 24 

DATA HOURS, 31, MINUTES, 32, DEGREES, 

DATA CUP, 41, CUPS, 41, C, 41 
DATA TEASPOON, 42, TEASPOONS, 42, TSP 
TSPS,42 
DATA TABLESPOON, 43, TABLESPOONS, 43 
DATA TBSP,43,TBSP5,43 
DATA OUNCE, 44, OUNCES, 44, DZ, 44, OZS 

DATA !,0 



30 
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Listing 2: BASiC 



NN 10 REM Sanple progran to denonstrate 

UD 20 REM vocabulari^ searching for words 

XD 30 REM entered by user 

BK 35 REM 

OS 46 DIM UOCAB$C2801 ,TEMP$C401 jH0RD$C20] 

,ML$C79) 
HN 50 OPEN «2,4,0,"I>:PflRSER.0BJ" 
FP 60 FOR 1=1 TO 6 
EF 70 GET U2,(t 
IW 80 NEXT I 
PJ 90 FOR 1=1 TO 79 
CB 100 GET »2,A 
AR 110 ML$tI)=CHR$tfl) 
FU 120 NEXT I 
LP 130 CL05E «2 

ZY 140 OPEN tt2,4,0,"D:UOCflB.DAT" 
DC 150 FOR 1=0 TO 6 
RE 168 INPUT «2, TEMPS 
VJ 170 gOCAB5tI»40+i)=TEMPS 
GH 188 NEXT I 
MB 190 CL05E «2 
TZ 200 PRINT CHRStl25) 
AO 210 PRINT "Enter a word tQUIT to exitJ 

■ II 

XA 220 INPUT HORDS 

IM 230 IF W0RD$="QUIT" THEN 5T0P 

ZL 246 POKE 1790, LEN tW0RD$) 

JH 250 X = U5RCADR(ML$] ,ADRCVOCAB$] ,ADRCMOR 

D$)) 
GP 260 IF PEEKC17913=0 THEN PRINT "Sorry, 

I don't know ";WORD$ 
BI 270 IF PEEKC17913>0 THEN PRINT "Token 

for ";WORD$J" is ";PEEKtl791) 
TT 280 PRINT 
MU 290 GOTO 210 



Listing 3: Assembly 



0100 

0110 

0120 
0130 
6140 
0150 
0160 
0170 
0180 
0196 
6206 
6216 
0228 
0230 
8240 
0250 
0260 
6278 
6286 
6296 
0368 
6316 
6320 
6330 
8340 
6356 
0366 
6376 
0380 
0390 
8468 
8418 
8428 
8436 
0440 
8450 



.OPT OBJ, NO LI5T 

Vocabulary searching routine, to 
be used as part of a natural 
language parser program 

by Karl E. Miegers 

This Machine language subroutine 
is designed to be called froM a 
BA5IC program. It takes two 
arguMents: the address of the 
vocabulary data string, and the 
address of the variable that 
contains the word being searched 
for, like this: 

X = U5RtlOC, ADR cyOCABS),Al>R CHORDS) 



UOCAB = SCB 
WORD = SCD 
LENGTH = $66FE 
RE5ULT = S66FF 

routine is orged at S660, but is 
relocatable 

»= SO60O 



set up arguMents passed froM 
BASIC, into page variables 



PLA 



0460 
G470 
0480 
0490 
0500 
0510 
0526 
0530 
0540 
0550 
0568 
0570 
0586 
0596 
0600 
0610 
0620 
0630 
0640 
0650 
0660 
0670 
0680 
0690 

0700 

0710 
0720 
0730 
0740 
0758 
0768 
0770 
0780 
0790 
0800 
0810 
0820 
0830 
0840 
0850 
0860 
0870 
0880 
0890 
0900 

0910 

0920 

0936 

0940 

0950 

0966 

0970 

0980 

0990 

1868 

1016 

t 

1820 

1030 

1040 

1050 

1060 

1070 

1080 

1090 

1100 

1110 

1120 
1130 
1140 
1150 
1160 
1176 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 



PLA 



jpointer to start 



5TA UOCAB+1 ;of vocabulary 



PLA 

STA UOCAB 

PLA 

STA WORD+1 

PLA 

STA NORD 



;character string 

;pointer to start 
,"of word being 
;searched for in 
;vocabulary list 



search routine starts here with 
next word being pointed to by 
yocAB variable; branch to label 
ANALYZE to look for Match; if 
no Match, return to here; last 
■entry' in UOCABS has token of 
0, so store that in RESULT and 
return to BASIC prograM 



CLD 
BEGIN 

LDY ttO 

LDA CU0CAB),Y 

BNE ANALYZE 

STA RESULT 

RTS 



see if length Matches that of 
next word in vocabulary 



ANALYZE 

CMP LENGTH ; lengths Match? 

BNE NEXTHORD ;no, go on 

LDY LENGTH ;yes, Check chars 



coMpare characters in target 
word with those in current word 
in vocabulary 



CYCLE 
LDA 
DEY 
CMP 
BNE 
TYA 
BNE 
LDY 
INY 
LDA 
STA 
RTS 



CVOCAB),Y ;get next char 
;and coMpare to 

CW0RDJ,Y ; target word 

NEXTNORD ; no Match, go on 
;Matches, check 
;next char 
; found! point to 
;token value, get 

cyoCAB),Y ;it, and store 
; in RESULT byte 
;all done, so exi 



CYCLE 
LENGTH 



RESULT 



Skip to next word by adding 
length of current word to 
pointer to vocabulary list 



NEXTMORD 
CLC 

LDY ttO 
LDA UOCAB 
ADC CUOCAB),Y 
STA yoCAB 
BCC NOINCl 
INC UOCAB+1 

NOINCl 
CLC 

LDA UOCAB 
ADC »2 
STA UOCAB 
BCC N0INC2 
INC UOCAB+1 

N0INC2 



continue search with next word 
in the vocabulary 



CLC 

BCC BEGIN 
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Database 

DELPHI 



Once you ^ve downloaded 
whafs accumulated in the 
Atari Group^s databases j 
maybe you HI want to submit 
some of your own files. 



by Michael A. Banks 



As I write this, it's 103 ° outside. The 
ground is riddled with crackly brown 
stuff that used to be soft green grass. 
My air conditioner is chugging away, 
giving me occasional pause when the 
compressor cuts in and the lights dim. (Yes, 
I do have a surge protector and lOO-amp serv- 
ice; the voltage drops are the result of the high 
demand of constantly running air condition- 
ers throughout the neighborhood. . .Sigh.) 
But that's okay— I'm dealing with it crea- 
tively. Each problem is a challenge. We have 
a ban on watering, so I catch the air- 
conditioner condensation with a bucket and 
use that to water our small flower garden and 
large rosebush (Japanese beetles gotta eat 



too!) And because Southwestern Ohio, where 
I live, is particularly hard hit by the drought, 
the water is shut off during the day on occa- 
sion, which makes it tough when I've forgot- 
ten to stock up on botded water. But I can 
melt a couple trays of ice cubes for fresh 
drinking water and go on enjoying my iced 
tea without interruption. 

So, it's not so bad— in fact, meeting 
challenges creatively is kinda fun. But I hope 
a cold front moves in soon to help dampen 
the effects of Father Sol's fusion plant so I 
can turn my creative energies to more in- 
teresting pursuits .... 

Of course, all that's history now, as you 
read this. Those of you who live in the tem- 
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perate zones (and even you in the Southwest, 
Texas and Florida) are enjoying cooler 
weather and earlier sundowns. And like me, 
you're probably spending less time on heat 
survival and more on fun and creative ac- 
tivities. 

As I noted in October's column, this time 
of the year is a good time to catch up on 
programming, disk-housekeeping and check- 
ing out what's accumulated in the Atari 
Group's databases while you were on vaca- 
tion or busy coping with the drought. And, 
now that you have the time, maybe you'll want 
to share some of your own creativity with 
other Atari group members via those same 
databases. So, as promised, this month's 
column focuses on downloading files from 
the Atari database, as well as submitting files 
of your own. 




Downloading. . . step by step 

If you read October's column, you know 
that you must go through two steps prepara- 
tory to downloading a database file: Select 
a database and read the file's description. To 
select a database, type DA at the Atari 
Group's main menu, then the name of the 
database that you wish to access (or, simply 
type DA and the first few letters of the data- 
base name together: DA GEN). 

Once you're at the database prompt, type 
READ to see the description of the database 
item. Now, if you just type READ when you 
enter the database, you're going to see the 
description of the first (newest) file in the 
database. So, you might want to do a direc- 
tory first (press Return), or search for data- 
base items by keyword as I described last 
month. 

In case you missed the October issue, 
here's a thumbnail sketch of the search 
process: Type SEARCH and a keyword, and 
you'll be presented with a list of items con- 
taining the specified keyword. All 
commands— including READ— will then 
operate on the selected items; in effect, you 



will have created a temporary subset of the 
database that contains only the files match- 
ing your keyword. You can also narrow or 
expand your search, by selecting either com- 
mand from the database menu. 

Once you've read a file's description you'll 
be at the ACTION prompt. Here's an exam- 
ple, of what you'll see (in this case, I typed 
DA GEN at the Atari Group's main menu, 
to reach the general database, after which I 
typed READ BOOT CAMP #61): 



<<< ANALOG Databases »: 

General Interests Menu: 

Directory of Groups 
Read {and Download) 
Search (by Keyword) 
Narrow search 
Widen search 



Set Topic 

Submit 

Workspace 

Help 

Exit 

!, Set, Exit) READ BOOT CAMP 161 



DDAEESrGen> [Dir, Ri 

Nome: BOOT CAMP 161 

Type: PROGRAM 

Date; 7-JUN-19BB 20:39 by ANALOGl 

Karl Wiegers supplies a handful of useful graphics macro 
June's Doot camp. Please see ANALOG #61 for complete 
documentation. 

This program Copyright 1988 by ANALOG computing. 

Keywords: PROGRAM, WIEGESS, GRAPHICS, ASSEMBLY, JUNE, DC 

Contents: 

1 MAC/65 FILE (Size; 4096 Count: 9) 

2 MAC/65 FILE (Size: 52-lB Count: 8) 

ACTION> {Next, Down, Xm, List) 




The Action menu 

The ACTION prompt is one of the few 
places on DELPHI where a menu is not au- 
tomatically displayed, even if you are running 
with menu prompting. (The ACTION prompt 
shows the major commands: "Next," which 
takes you to the next file; "Down," which 
sends the designated file to your computer us- 
ing your default download method (more on 
this in a bit); "Xm," which initiates an Xmo- 
dem file transfer to your computer; and 
"List," which displays the designated file as 
unformatted ASCII text.) 

To see the ACTION menu, type MENU 
or ?. This menu is displayed: 



ACTION Menu: 

Mext Group/File 

Download 

List (Unfocmatted) 

Display (Word-wrapped) 

Description of Group 



show Files 
Set Topic 
Help 



The first three items on the menu (Next, 
Download and List), I've just explained. Dis- 
play is like List, except that the file is dis- 
played wordwrapped and with "More?" 
prompts. (Note: List and Display should nor- 
mally be used only with text files.) Descrip- 
tion of Group redisplays the current item's 
description for your review. Show displays a 
list of the files in the group (as you've no- 
ticed in the preceding description, there can 
be more than one file). Set Topic allows you 
to select a different database. Help and Exit 
are self-explanatory. 

All of these commands are available 
whether you display the menu or not. 




Download commands 

To download a file, simply type DOWN- 
LOAD, and DELPHI will send the file to you 
using your default file-transfer method. You 
can view your current default-file download 
method by typing /FX_METHOD.(The 
default method is set at the "Set Preferences" 
selection at the Atari Group's main menu, via 
the SETTINGS selection in Workspace, or 
in the SETTINGS area of USING DELPHI). 

In multiple-group database items (as in the 
"BOOT CAMP #61" example), the first file 
is sent, unless you specify a different file by 
number. 

If you don't want to use your default file- 
transfer method (perhaps you want to try 
Xmodem, but your default is Kermit), you 
can change it temporarily in one of three 
ways: 

1. Type DOWNLOAD followed by the 
name of the file-transfer method you wish to 
use. (Example: DOWN XMODEM.) 

2. Type /FX_METHOD foUowed by the 
name of the file-transfer method you wish to use. 
(Example: /FX_METHOD XMODEM.) 

3. Type DOWNLOAD MENU to view this 
menu: 



Download Method Menu : 

XMODEM (128 byte bloc)<s) 

Kermit 

WXMODEM {Windowed XMODem) 

YMODEM (1024 byte blocks) 

Buffer Capture 

DOWNLOAD> ( Xm , Kermi t , wxm , f m , Buf f , RT , YB ) 



RT Duffer Capture 
YB (YMODEM batch) 
Help 

Exit 
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Database 
DELPHI 



At this point, you can enter your choice of 
file-transfer methods and proceed with the 
download. DELPHI will tell you to prepare 
your computer to receive the file and provide 
any other information necessary (like how to 
abort the transfer), then signal you to begin 
the necessary procedure to receive the file at 
your end. 

If your terminal software has the capabili- 
ty, I highly recommend using Xmodem, Ker- 
mit or Ymodem over ASCII/buffer capture, 
even for text files. There's much less chance 
of "garbage" getting into a file with one of 
those error-checking protocols. 

By the way, if you have a comment on a 
file, you can E-mail it to the person who up- 
loaded the file right at the ACTION prompt. 
Simply type REPLY, and a DELPHI mail 
message will be addressed to the member- 
name listed as the file's "Owner" (that's the 
person who submitted it to the database), 
with the subject header filled in. Type your 
comments, then CNTL-Z to send the mes- 
sage, and you're back at the ACTION 
prompt. 




Submit! 

As you know, a major portion of the files 
in the Atari Group's databases is contributed 
by DELPHI members like you. The files are 
placed there through a process called "sub- 
mitting." At present, you can receive free 
time when you submit files (select "Request 
Free Upload" at the Atari Group's main menu 
for more information). 

Before you can submit a file to a database, 
the file you wish to submit must be in your 



Workspace. Files are put in Workspace in one 
of three ways: by extracting them from E- 
mail, by creating them (text files only) with 
the CREATE command or by uploading 
them. 

You can upload files to your Workspace us- 
ing almost any file-transfer method: ASCII 
upload, Xmodem, Kermit, Ymodem, Ymo- 
dem Batch or WXmodem. The method you 
use is up to you. (Type HELP UPLOAD, 
HELP XUPLOAD, etc., at the Workspace 
prompt for more information on uploading 
files.) 




Preparing a file for submission 

If you're submitting a program or binary 
data file, you can upload the file with no spe- 
cial preparation, other than, perhaps, archiv- 
ing it to save upload and download time. 

If you're uploading a text file, there are 
several things to keep in mind. For openers, 
I recommend that you upload long text files, 
rather than try to create them online— the 
DELPHI text editors are rather difficult to 
use compared with your average word proces- 
sor. For files which may be read online- 
even partially— you should keep your line 
width (number of columns) down to 70 or so, 
to accommodate wordwrap. Also, it's a good 
idea to begin any text file with .It (this is a 
command that causes DELPHI to display any 
text online formatted in the same way you up- 
loaded it). 

Oh yes— text files should generally be 7-bit 
ASCII. 




The submission process 

Assuming you have a file in your Work- 
space to submit, the next step is to type SUB- 
MIT at any database prompt (that's at the 
database name prompt, which says DBASES: 
and the first few letters of the name of the 
database, like this: DBASES:Gen>). Or, 
better yet, type SUBMIT at the Workspace 
prompt to submit it right after you upload it. 

The actual submission process is merely 
a matter of responding to a series of prompts, 
and you can abort the process at any time by 
entering CNTL-C. When you type SUBMIT, 



you'll be asked if you are ready to submit a 
file. Type Y. Next, you'll be asked to enter 
the number of files you are submitting (usual- 
ly 1). If you are submitting more than one 
file, DELPHI will ask if the files are so relat- 
ed that they can be entered as a group in the 
database. Answer Y. 

Additional prompts will request the follow- 
ing information: 

The TYPE affile you are submitting. This 
tells DELPHI whether the file you are sub- 
mitting is a Program, Article, etc. If you are 
submitting a program file, DELPHI will ask 
you if the file must have a special download 
filename (this is normally the same filename 
as on your disk). 

The TOPIC of the file. This is the database 
topic under which your submission will be 
stored. (You need not be in the database topic 
to which you wish to submit a file.) 

A DESCRIPTION of the file. This is the file 
description that is displayed when the READ 
command is given by members in the data- 
base. It's a good idea to begin this with .It 
on a line by itself, just as you would begin 
any text file; that way, the description will 
be displayed as you enter it. Make this as 
short as possible— but don't scrimp on neces- 
sary details! (And if the file is archived, be 
sure to include this fact, along with the name 
of the program necessary to de-archive it.) 

The DISPLAY NAME of the file. This is the 
name that is displayed in the database direc- 
tory. It can be up to 32 characters in length 
and should be as descriptive as possible. 

KEYWORDS for the file. You'll have to 
select one major keyword from a list of six 
keywords established for the database topic 
in question (type ? at the Keyword prompt 
to see this list). After the initial keyword 
specification, you can add several keywords 
of your own choice. Remember that keywords 
are search aids, so think of the major key- 
words under which other DELPHI members 
might search for your file. If you're submit- 
ting a printer utility, you might use the key- 
words PRINTER, UTILITY, the name(s) of 
the printer(s) with which the utility operates 
and any other distinguishing features of the 
program. 

After you've entered the all of this infor- 
mation, you'll be prompted for the WORK- 
SPACE FILENAME of the file you are 
submitting. If you forget the filename, type 
a question mark or press Return at this 
prompt; DELPHI will display a list of your 
Workspace files. 
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After you have provided all the necessary 
information, you will be asked if you wish 
the file you have submitted deleted from your 
workspace. Answer YES or NO, as you wish, 
and the submission process will be com- 
pleted. 

The file you submit will not be immedi- 
ately available in the database to which you 
submitted it. It is temporarily stored in a spe- 
cial preview area, to await review by the Atari 
group manager. The manager will review 
your submission, edit the description or key- 
words if necessary, and have it in the ap- 
propriate database and available to all Atari 
group members within a day or two. 




Conference reminder 

Don't forget the real-time conference held 
in the Atari Users' Group every Tuesday at 
10 p.m., EST. To join, type CO at the SIG 
menu, and then type WHO at the conference 
menu. You'll see a conference group name, 
with a list of the members participating 
beneath the group name. The name will be 
preceded by a number. To join, simply type 
JOIN followed by the number and you're in! 
Type to talk. If you get stuck, ask those in 
the conference group for help or type /HELP. 




Be a Game Designer! 

Ever wanted to design your own video 
game? You're on! MATRAT (Matthew Rat- 
cliff) and the ANALOG'S Atari Users' Group 
are giving you the opportunity to help write 
a video game. MATRAT has volunteered to 
do the programming, and a thread in the For- 
um contains all the design elements and sug- 
gestions to be used in the game. Things are 
progressing nicely, and at this point the ac- 
tion gamers seem to have the upper hand over 
the adventure gamers. Your input is needed! 
To get in on the fun, go to the Forum and 
read Message 37596. Then type FOLLOW to 
read what everyone else has to say about the 
design. 

Once you have a handle on what's happen- 
ing, add your comments with ADD or by typ- 
ing REPLY 37596. 
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Once the game is under software construc- 
tion, the thread will be posted in the data- 
base. Once completed, the game design may 
be a feature game and article in ANALOG 
Computing. 

That's it for now. Next month: An eclectic 
mix of tips and tricks. Until then, see you 
online! 

In addition to having published science fic- 
tion novels and books on rocketry, Michael 
A. Banks is the author o/DELPHI:The Offi- 
cial Guide and The Modem Reference— feor/j 
from Brady Books/Simon & Schuster Look 
for his articles on telecommunications and 
tips on using DELPHI in the Atari Users ' 
Group databases. You can contact Banks on 
DELPHI by sending E-mail to membername 
KZIN. 




Make the 
DELPHI Connection! 

As a reader of ANALOG Computing, you 
are entitled to take advantage of a special 
DELPHI membership offer. For only $19.95 
plus postage and handling ($30 off the stan- 
dard membership price!), you will receive a 
lifetime subscription to DELPHI, a copy of 
the 500-page DELPHI: The Official Guide by 
Michael A. Banks and a credit equal to one 
free evening hour at standard connect rates. 
Almost anyone worldwide can access DEL- 
PHI (using Tymnet, Telenet or other net- 
working services) via a local phone call. 
Make the DELPHI connection by signing up 
today! 

To join DELPHI: 

1. Dial 617-576-0862 with any terminal or PC 
and modem (at 2400 bps, dial 576-2981). 

2. At the Username prompt, type 
JOINDELPHI. 

3. At the Password prompt enter ANALOG. 

For more information, call DELPHI Mem- 
ber Services at 1-800-544-4005, or at 
617-491-3393 from within Massachusetts or 
from outside the U.S. 

DELPHI is a service of General Videotex 
Corporation of Cambridge, Massachusetts. 
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/ take the ^ Aground 
uf^ approach when I 
program a game: the 

graphics firstf then 
the game logic. 



Figure 1 - How to create a shape 



If darkened, add up bit 
value above the square. 




2nd 
Character 

2 keyboard characters 
make up this shape. 



128=128 

128+64=192 

1 28 + 64 + 32 = 224 

1 28 + 32 + 1 6 = 176 

1 28+64+32+1 6=2 

54 = 64 

1 28 + 32 = 1 60 

64 + 1 6 = 80 



A little character 

Perhaps one of the toughest parts of 
programming a game is deciding where to 
start (you may, however, disagree). The 
best thing to do is begin with the most 
dominant part of the game, the part that 
everything else tends to rely on. For ex- 
ample, I would start with the maze if I were 
doing Pac-Man, the terrain if I were doing 
Scramble and the centipede if I were do- 
ing Centipede. Once these elements are in 
place, the rest can be added piece by piece. 
It's sort of the equivalent of building a 
house floor by floor, starting with the 
basement. 

Of course, this is only my personal 
preference. You may prefer to start with the 
framework and then fill in the details (de- 
sign the game logic first and then do the 
graphics). The reason I take the "ground 
up" approach is because in most games the 
logic relies on the graphics being in place, 
so that it can detect collisions and respond 
appropriately. Also, it's a lot easier to pro- 
gram when you can see the results on the 
screen. 

Needless to say, we'll be programming 
our BASIC Invaders example from the 
ground up, which means we'll begin with 
the invaders themselves. As a result, this 
column will be dealing with character 
graphics. Please keep in mind that this may 
not be the case in your game. Your key ele- 
ment may use bit-mapped graphics or 
PMG. The important thing to take note of 
here, then, is not the fact that we're begin- 
ning with character graphics, but rather the 
techniques that we use to implement the 
character graphics. 

Our first step is to take the invader shapes 
we came up with earlier and translate them 
into values that the computer can under- 
stand. As you probably already know, this 
is done by treating each shape as a series 
of bytes stacked on top of each other. Each 
byte consists of eight bits which, like the 
dots, can be turned on or off. So we treat 
each dot as a bit. Because the invaders are 
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more than eight dots wide, we'll be using 
two characters for each invader. 

So let's get started. Because this is a rela- 
tively straightforward process, we'll 
single-step through the first invader. The 
first invader is shown in Figure 1. 

Now that we have our values, we're 
almost ready to give them to the computer. 
First of all, though, we have to reserve a 
place to put them, along with the rest of 
the character set. We do this with the fol- 
lowing program lines: 

3150 CB=PEEKt740J-4:P0KE 

186, CB-4 ! Cfl=CB»256 
3160 GRAPHICS 0:POKE 756 
,CB 

Now we have 1024 bytes reserved at the 
end of memory, and have told the computer 
that it will a find a character set there. So 
we'd better set one up quickly! To make 
things easier, I'll give you the complete pro- 
gram listing first, and then we'll go over 
it line by line: 

3030 DIM MLaNG$t901 
3050 DIM M0UMEMSC4iJ !G05 
UB 29500 :MOVMEMS=MLftNG$ 
3150 CB=PEEKC7463-4:P0KE 

106,CB-4:CA=CB»256 
3160 GRAPHICS 0:POKE 756 

PR 
3210 X=U5RtADRCM0UMEM$), 
57344, CA,1023J 
3220 MEM=CA+512:F0R 5EC= 
TO l:G05UB 325OO+10»5E 
C:X=U5RfADRtM0UMEM$) , ADR 
CMLAHG$3 , MEM, LEN CMLAHGSJ 

3230 MEM=MEM+LEMtMLANGSJ 

■ M£}{f SEC 

3240 X=USRCADRCM0UMEMSJ , 

CA+128,CA+640,335) 

28999 END 

29500 MLANG $ = "hhn E hX lh 7E 

hTQhjaui^ ih[i!3i]>'m£Xmj 

trBMH?": RETURN 




32510 MLANG$ = "->|-»~-^[3iE: 
'■0¥n¥"1h i¥ G¥*¥Q **88 
raS": RETURN 



nai 



Don't forget that lines 29500 through 
32510 come from a previous column. In 
case you're wondering about the rest of the 
program, here's the complete explanation: 



3030; You may remember MLANG$ 
from the program lines we generated previ- 
ously. It's used for temporary storage of the 
machine language routines and character 
set data. 

3050; MOVMEM$ holds a machine lan- 
guage routine that we'll be using through- 
out BASIC Invaders to move things around 
in memory. You'll see how it's used later 
in this explanation. 

3150; You saw this already, but I'll ex- 
plain in case it wasn't clear. Location 740 
points to the top (or end) of memory. Lo- 
cation 106 points to where the computer 
thinks the end of memory is. So, we set a 
variable called CB to point to where the be- 
ginning of our character set will be 
(PEEK(740)-4, which is four pages below 
the top of memory, with a page being 256 
bytes). Then we reset location 106 to point 
1024 bytes (256*4) below the character set. 

Why? Because the area of memory right 
after that pointed to by location 106 isn't 
always safe. Anyway, it isn't really that im- 
portant for you to understand this. Just keep 
in mind that this line will reserve memory 
for the character set. You may also want 
to know that if you're using a program like 
BASIC A+, which also changes location 
106, then you should change 
CB=PEEK(740)-4 to CB=PEEK(106)-4. 

3160; The screen is usually kept at the 
top of memory, and is right now in the 
space we've reserved for our character set. 
By using a GRAPHICS command, we 
move it down below the new top of 
memory. Also, we tell the computer where 
our new character set will be. 

3210; This line moves the regular charac- 
ter set to our reserved space, and is an ex- 
ample of using MOVMEM. In general, the 
way to use MOVMEM is with the follow- 
ing command: 

X=USR (ADR (MOVMEMS) , FROM, 
T0,LENGTH-1) 

FROM is the address of the first memory 
location you want to move from, TO is the 
address of the first memory location you 
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Before you start complaining that your invader 
characters don H look right, keep in mind that 
you Ve looking at them in graphics mode zero. 



want to move to and LENGTH is the num- 
ber of bytes you want to move. So, in our 
example, we are moving tlie 1024 bytes 
starting at location 57344 (the address of 
the Atari character set) to the memory area 
starting at location CA (the address of our 
character set). 

3220-3230; Now we put our redefined 
characters into the new character set. The 
graphics characters being at CA-f-512. 
We've already put our character data into 
strings in lines 32500 and 32510, so we 
GOSUB to these lines, then move the data 
from MLANG$ to the character set. No- 
tice that we once again use MOVMEM. 
You'll find that there are a lot of times that 
MOVMEM will come in handy, and not 
just the ones that we'll cover in this book. 

3240; Here's MOVMEM again! Actual- 
ly, this line isn't really necessary at this 
point, but I included it because it follows 
along with everything else here. All it does 
is move the numbers and uppercase charac- 
ters into the lowercase part of the charac- 
ter set. Why? In graphics mode one, you 
have to choose between lowercase/graph- 
ics and uppercase/numbers. We want to be 
able to have uppercase, numbers and 
graphics at the same time (so we can in- 
clude the score), so we simply move things 
around a little. 

28999; That's it folks. 

29500-32510; These are just the subrou- 
tines to set up MOVMEM and the rede- 
fined characters. See the previous column 
on how to set them up. 

I know there are a few things that I ha- 
ven't mentioned yet, and I'll get into them 
soon. First, however, why don't we make 
sure that this program really works. Run 
it, and then try typing CTRL-A, CTRL-B 
and so forth, all the way up to CTRL-N 
(preferably all right next to each other). 
This should give you all our invaders 
characters. Now before you start complain- 
ing that they don't look right, keep in mind 
that you're looking at them in graphics 
mode zero. We'll be using them in graph- 
ics mode one, and in a minute you'll see 
as 



what they look like in that mode. But first, 
it's time to clear up a few things. 

In the process of getting all of this up and 
working, I've conveniently neglected to fill 
in a few of the details. For example, you 
may have noticed that the first character we 
redefined was all zeros or a blank space. 
Why? Try going into graphics mode zero, 
and then POKE 756,226. See how the 
screen fills with hearts? What we just did 
was switch to lowercase/graphics. In lower- 
case/graphics, there is no space character. 
What the computer uses instead is the 
heart. So, to avoid this problem, we re- 
define the heart to be a space. Okay? 

Well, that was easy to explain. Next up 
is a problem that many people run into 
when working with the character set: the 
character values. You already know about 
ATASCII values, right? Each character is 
assigned an ATASCII value between zero 
and 255. If you want to find out the value 
for a particular character, use the ASC 
command from BASIC (PRINT 
ASC("E"), for example). 

Anyway, each character has a value, 
which tends to put the characters in a 
specific order. Now it would make sense 
that the characters would be stored in this 
order in the character set, right? Of course 
it would, but when was the last time a com- 
puter made sense? Instead, there is another 
order for the character set, called the in- 
ternal order. There is an easy way to figure 
out the internal value from the ATASCII 
value. The following table shows how to do 
it: 



TYPE OF CHARACTER 


ATASCII 


INTERNAL 


Graphics 

Uppercase/Numbers 

Lowercase 


0-31 
32-95 
96-127 


Add 64 

Subtract 32 

Same 



(Anything with a value greater than 127 is 
just the inverse of the character with the 
same value minus 128) 

All this does is switch the graphics and 
uppercase/numbers as far as order is con- 



cerned. No big deal, but you have to 
remember to use the internal order when 
dealing directly with the character set. 

One more detail that tends to trip a lot 
of people up. Suppose you want to change 
a character with an internal value of «, and 
the character set begins at CA. Do you start 
changing bytes at location CA-f-n? No, be- 
cause each character takes up eight bytes 
in the character set. That means that the 
character starts at CA-l-n*8. A silly little 
detail like this has left a lot of people won- 
dering what went wrong! 

Okay, now it's time to put our invaders 
into action. What we're going to do is put 
them into a long string and then just print 
this string on the screen. Remember, 
though, that there are two versions of each 
invader So our string will actually hold two 
versions of the invader screen. We'll alter- 
nately print each version, thus getting some 
animation out of the invaders. This will 
make more sense after you try it out, so 
make the following changes to the previ- 
ous program: 

3030 DIM MLANG$C9e} ,INU$ 

C480] ,DAT$(16) 

3168 GRAPHICS 17:P0KE 75 

5378 INV$="¥":INU$C480}= 

"¥":INU$(2J=INV$ 

5388 RESTORE 5418 

5398 FOR LP=0 TO 4 STEP 

2:READ DATS:INV$CLP»48+1 

, LP«4e + 16) =DftT$ : INU$ CLP» 

48+281, LP*40+296)=DflT$ 

5488 REfiD DAT$ : INV$ CLP»4 

O+41,LP*40+56)=DflT$:INU$ 

CLPW40 + 241, LP»40 + 2563 =Dfl 

T$:NEKT LP 

5410 DATA MMhlf-lh IhJhJ 

5420 POSITION 0,B:PRIMT 

tte;INU$Cl,248) 

5430 POSITION 0,8:PRINT 

«6;INU$C241,480J 

5440 GOTO 5428 

You can go ahead and run the new pro- 
gram and watch the results. When you're 
done, here's the explanation of the changes: 

3030; We've added two more string vari- 
ables to this line. INV$ is going to hold the 
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invaders screens, and we'll use DAT$ to 
help us set up INV$. 

3160; We're using a full screen graphics 
mode one (GRAPHICS 1+16), and the 
graphics/lowercase section of our new 
character set. 

5370; Okay, now we start setting up 
INV$. This line is a tricky way to set the 
entire string to hearts, which we've rede- 
fined to a space character. Incidentally, 
CTRL— will get you the heart character. 

5380; In a long program where you'll be 
reading different data over and over again, 
it's a good idea to RESTORE the data first, 
just to make sure that you won't be read- 
ing the wrong stuff. That's why this line 
is here. 

5390-5400; Now things start to get a lit- 
tle complicated, so let's take a good, close 
look at this loop. LP keeps track of the in- 
vader row that we're working on. We'll be 
doing two rows at a time, so we use STEP 
2 (there are three types of invaders and two 
rows of each). The first thing we do is read 
a row of invaders into DAT$. Then DAT$ 
gets transferred to two places in INV$ 
(more about this in a minute). Finally, 
another row is read into DAT$ and then 
transferred to INV$, and the loop repeats. 

The thing that really needs explaining is 
the process of transferring DAT$ to INV$. 
What exactly is going on? Let's look at the 
whole thing in English from start to fin- 
ish. When matching the English explana- 
tion to the program lines, keep in mind that 
the first invader screen starts at INV$ (1,1) 
and the second at INV$ (240,240). You 
should also be aware that a line on the 
screen is twenty characters long, and we 
keep a blank line between each row of in- 
vaders. 

Now that you're all geared up for the in- 
credibly complicated explanation that 
you're sure is about to follow, relax. The 
first time through, the loop reads a row of 
invaders (version one of invader one) and 
puts it into the first row of the first screen 
and the second row of the second screen. 
Then it reads another row (version two of 
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invader one) and puts it into the second row 
of the second screen and the first row of 
the second screen (by alternating versions 
like this, there will be more variety in the 
rows). 

The next time through the loop, version 
one of invader two gets put into the third 
row of screen one and the fourth row of 
screen two. Then version two of invader 
two gets put into the fourth row of screen 
one and the third row of screen two. The 
third and last time through the loop, ver- 
sion one of invader three gets put into the 
fifth row of screen one and the sixth row 
of screen two. Version two of invader three 
then gets put into the sixth row of screen 
one and the fifth row of screen two. And 
that's all there is to it. 

5410; Here's the data for the rows. How, 
you may be wondering, am I supposed to 
type this in? Either that, or you somehow 
managed to type it in already and are now 
extremely upset that I waited until now to 
tell you how. Sorry about that. Anyway, it's 
made up of eight CTRL-A/CTRL-Bs, eight 
CTRL-C/CTRL-Ds, eight CTRL- 
E/CTRL-Fs, eight CTRL-G/CTRL-Hs, 
eight CTRL-I/CTRLJs and eight CTRL- 
K/CTRL-Ls. If you type it in after running 
the original program, it will make more 
sense (since these graphics characters will 
look like the invaders). 

5420; Now we're ready to get things go- 
ing on the screen. We first put the cursor 
at the top left of the screen. Then we print 
the first 240 characters of INV$, which is 
the first invader screen. 

5430; Now we do the same thing, except 
this time we print the second 240 charac- 
ters of INV$ or the second invader screen. 

5440; Finally, we make it into a loop so 
that the invaders will walk in place forever 
(or until you press the BREAK key). 

So, what do you think so far? Not bad 
for BASIC? The problem is, we haven't 
really done anything yet. Keeping that in 
mind, what you see on the screen is actu- 
ally extremely slow. By the time the rest 
of the program is in place, these moving 



invaders would be moving in extremely 
slow motion. But is there any way to speed 
things up? 

Before I answer, think about the fact that 
what's slowing us down is the PRINT state- 
ment. What we need to do is find another 
way to get the invaders from INV$ to the 
screen. Perhaps I should restate that as 
"moving the invaders from the INV$ to the 
screen." Does that suggest a solution to 
you? If you thought of MOVMEM, give 
yourself ten points. Since we can find out 
the address of the screen using locations 
88 and 89, there is absolutely no reason 
why we can't use MOVMEM instead of 
PRINT. How much of a speed difference 
will it make? Make the following changes 
and find out for yourself: 



5180 MEM1=PEEKC88)+PEEKC 

5420 K=U5RCftDRCM0UMEM$J, 
ftDRCINU$) ,MEM1,239) 
5430 K=USRfftDRCMOUMEM$J, 
ADRCINU$)+240,MEMi,233) 
5440 GOTO 5420 



Wow, quite a difference, eh? Here's a 
brief explanation: 

5180; MEMl is the address of screen 
memory. 

5420; This is the equivalent of the old 
Line 5420. 

5430; This is the equivalent of the old 
Line 5430. 

5440; Do it again (and again and again 
and). 

Once you get over the shock of the extra 
speed, notice the invader's color. It may not 
be obvious, but it is a different color than 
when we were PRINTing them. The rea- 
son for this is the fact that when we move 
characters directly to screen memory, we're 
dealing with the internal values rather than 
the ATASCII ones. In graphics mode zero, 
this means that we don't get the proper 
character. In graphics modes one and two, 
we either get the wrong character or a 
change in color. Change line 5410 to the 
following: 
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If you RUN the program with this change 
you'll notice that, despite the fact that we've 
changed some of the CTRL characters to 
letters, we still get the invader characters 
on the screen, only in different colors. To 
figure out what's going on, look up the in- 
ternal values of the characters in Line 5410 
and compare them to the internal values of 
the CTRL characters. 

In graphics modes one and two, only the 
values between zero and 63 are used to de- 
termine the character. By adding 64, 128 
or 192 to these values, you simply specify 
a different color for the character. You 
might like to play around with the charac- 
ters in Line 5410 to see what I mean. When 
you're done, leave them as they are in the 
above line. It's nice for each type of invader 
to have a color of its own. 

Before we go on to the next stage of our 
game program, a few words about your 
own games. Even though we're using 
different colored invaders in this game, 
each invader only has one color. What if 
you want to use more than one color in 
each character? Is it possible? Yes, and 
there are a number of different ways to go 
about it. 

In graphics mode zero, there is some- 
thing called "artifacting" that will allow 
you to have more than one color per 
character. In this mode, the dots in even- 
numbered columns have a different color 
than the dots in odd-numbered columns. 
Two dots side-by-side make a third color 
(white, usually). Along with the back- 
ground color, this gives you a total of four 
colors instead of the usual two. The only 
problem is you have to be careful of where 
you place your dots. As an exercise, try 
redefining a couple of graphics mode zero 
characters so that one is aU even-column dots, 
one is all odd and the other is a mix. 

The other way to get multi-color charac- 
ters is through the use of a special graphics 



mode called ANTIC mode four. In this mode, 
each dot can have one of four colors also, but 
you don't have to worry about odd and even. 
Also, the dots get their colors from the color 
registers, whereas the colors in artifacting 
come from a trick, and you can't change one 
of them without changing the rest. 

To get four colors in ANTIC mode four, 
each dot is two bits wide instead of one. 
These two bits can hold a value between zero 
and three, which specifies the color register. 
So, when designing characters in this mode, 
you must keep in mind that each dot is two 
bits wide instead of one and has three ways 
of being "on" instead of one. Otherwise, the 
procedure for redefining characters is exact- 
ly the same. As far as getting to the mode 
in the first place, that has to do with Display 
Lists, which we'll be getting to in the future. 

So much for that. Our next step in 
programming our game is to get the invaders 
moving back and forth across the screen. Un- 
fortunately, here we run into a problem. The 
only way to move things using character 
graphics alone is to move them a whole 
character at a time. This means that charac- 
ters will appear to jump across the screen in- 
stead of moving smoothly. That's not good. 
We want our invaders to move one tiny step 
at a time. So how do we solve this dilemma? 

Actually, there is a way to do it with charac- 
ter graphics. If we design eight versions of 
each character, with each version being shift- 
ed to the right one dot, then we can get 
smooth movement by switching between 
these different versions. Well, this may be a 
good solution in some instances, but not in 
ours. Don't forget that we're using fourteen 
different characters for the invaders and the 
invader explosion. Eight versions of each 
would mean a total of 112 characters. Not only 
is that most of the character set, but it's also 
more than the 64 we're allowed in graphics 
mode one. 

Besides, even if we could have that many, 
we would also have to have eight versions of 
INV$, which would take up almost 4K of 
memory alone. Nope, this technique is just 
not going to work for us here. Instead, we're 



going to use something that I'm sure you 
know about but haven't been able to use much 
before: fine scrolling. 

Scrolling 

For some reason, scrolling has become the 
BASIC programmer's dream and nightmare 
at the same time. Despite the great effect it 
creates in even the simplest programs, it 
seems that it's not too easy to get scrolling 
working from BASIC. Well, by the end of this 
discussion, fine scrolling will be just as easy 
as a simple POKE or two. 

Instead of spending time looking at exact- 
ly what fine scrolling is and how it's done, 
let's jump right into an example. After we've 
got something up and running, we'll come 
back and take a look at the details. For now, 
delete lines 5420, 5430 and 5440 from the 
program we just created, and then add the fol- 
lowing lines: 

90 GOTO 3010 

1000 X=USR(ADRCMOUMEM$}, 

ADR (INy$J +5B, MEMl, 239J 

1080 5Br240»C5B=0J 

1280 IF C0aR5E=4 OR COAR 

SE=-2 THEM CHftNGE=-CHANG 

ElPOKE 1791,129-PEEKC179 

11 

1330 5CR0LL=SCR0LL+CHANG 

E 

1340 IF 5CR0LL>15 THEN 5 

CR0LL=SCR0LL-16:C0AR5E=C 

0AR5E+2:P0KE 1790,2:G0T0 

1360 
1350 IF SCROLL<0 THEM 5C 
R0LL=SCR0LL+16;C0AR5E=C0 
ARSE-2:P0KE 1790,2 
1360 POKE 1788,5CR0LL:P0 
KE 1787,1 

1380 IF PEEKtl790J<>0 TH 
EN 1380 

1390 GOTO 1000 
3010 POKE 559,0 
3040 DIM UBLDFF$C20] :G05 
UB 29000 :UBLOFF$=MLfiNG$ 
3160 FOR 5EC=0 TO 1:G05U 
B 31000+10W5EC 
3170 K=U5RCADRtM0yMEM$J, 
ADRtMLANG$J . Cfl-256+98*5E 
C,LENCMLANGSJ-1) IHEHT SE 
C 

4000 GRAPHICS 17: POKE 55 
9,0!P0KE 755,CB+2 
5010 DLIST=PEEKC560J+PEE 
KC551)*256 

5020 POKE DLIST+3,86 
5030 FOR LIME=2 TO 12:P0 
KE DLIST+4+LIME,22:MEKT 
LINE 
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5270 5CR0LL=6:CHftNGE=l:5 

B=e:COAR5E=0 

5200 POKE 559,34 

5290 POKE 54276,0 

5360 POKE 1789,0:POKE 17 

9O,0:POKE 1791,128 

5460 GOSUB 31500:X=USRCA 

DRfML0HG$3 ,Cfl-256) 

5490 GOTO 1000 

29000 MLfiNG$="haCl_EI/ 
BEMbOS \B4": RETURN 
31080 MLANG$ = "^ 

31010 MLANG$="H»nE 
gnygl/rfVL-f?]" : RETURN 
31500 MLfiNGS="hf 




♦":return 
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Before I get into an explanation of what we 
just did, we need to take a look at exactly 
what scrolling is in the first place. "Easy 
stuff," you say, "it's just moving things 
around on the screen." Yes it is, but it's the 
way things are moved that counts. As you 
probably know already, you can move charac- 
ters around the screen simply by printing 
them in different positions. Unformnately, the 
kind of movement that results isn't exactly the 
smoothest thing in the world, and it's also 
very slow. There's another way to get the 
screen to move without actually moving the 
objects on the screen. This method involves 
something called the "display list, "which you 
may have heard of, and is the heart of fine 
scrolling. 

The Atari computers do something that no 
other home computer that I know of allows 
you to do: put the screen data anywhere in 
memory. You can put the whole screen in one 
place, or break it up into two or more pieces 
and put each piece in a totally different place. 
You can even put two or more of these pieces 
in the same place, thus making things appear 
in two or more places on the screen (think 
that one over). 

All of this is because of the display list, 
which we'll cover in excruciating detail in the 
next column. For now, suffice it to say that 
you can specify a different screen memory 
location for each line on the screen. In a regu- 
lar graphics mode screen, a location is speci- 
fied for the first line, and the rest of the screen 
is assumed to come right after the date for 
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that line. 

Okay, so we've now specified where the 
screen memory can be found. Let's suppose 
that the number "1234567890" is on the 
screen, starting at the top left-hand corner. 
"What would happen if we now added one to 
the screen memory address? Screen memory 
would then start at the location that the "2" 
is stored in, right? And what effect would that 
have on the screen? The "2" will now be in 
the top left-hand comer, and the whole screen 
would have appeared to shift to the left by one 
character (the "1" will have disappeared off 
the left-hand side). Similarly, if we had sub- 
tracted one from the address, the screen 
would have shifted to the right by one. 

This relatively simple concept is the whole 
basis of scrolling. Each time you want to 
scroll by one character, you just add or sub- 
tract one to the screen memory addresses in 
the display list (if you don't want a particu- 
lar line to scroll, you just leave the screen 
memory address for that line alone). 

What if you want to scroll up or down in- 
stead of left or right? Let's suppose you were 
using graphics mode one, where there are 20 
characters on a line. Scrolling up by one 
character would then be the same as scroll- 
ing left 20 characters, and scrolling down one 
the same as scrolling right 20. Can you see 
why? Adding or subtracting 20 from the 
screen memory addresses moves screen 
memory to the next or previous line respec- 
tively, since the lines are stored one after the 
other in memory. It's as simple as that. 

Fine scrolling 

Who cares about scrolling by one charac- 
ter anyway? Wasn't the whole point of this 
column to learn how to scroll by less than a 
character, a task called "fine scrolling"? Yes, 
and fine scrolling is actually easier than 
scrolling by one character (called "coarse 
scrolling"). The problem is, you can only fine 
scroll by up to two characters (graphics mode 
one size). To do more than that, you have to 
combine fine scrolling with coarse scrolling. 
Before we get into that, however, let's look 
at how to fine scroll. 



There are actually only two relatively sim- 
ple steps to fine scrolling. The first is to de- 
cide which lines you want to fine scroll and 
then make some changes to the display list 
so that the computer knows which ones too. 
The second step is nothing more than a sim- 
ple POKE to tell the computer how much to 
scroll. That's it. 

But like I said before, the most you can 
scroll a line is two characters horizontally and 
two characters vertically. To get continuous 
fine scrolling, the trick is to fine scroll by two 
characters (although some prefer only to 
scroll by one), then coarse scroll by two and 
reset the fine scrolling at the same time. This 
has no visible effect on the screen (since the 
coarse scrolling moves moves the screen two 
characters in one direction, and resetting the 
fine scrolling moves it two characters in the 
opposite direction), but you are no longer at 
your fine scrolling limit and can now go 
ahead and fine scroll two more characters. 
By repeating this process, you can fine scroll 
forever if you want to. 

Are you suffering from information over- 
load? Perhaps it's dme to go ahead and ex- 
plain the above program lines, since they give 
an example of everything we just talked 
about. 

90; We're going to start by going off to the 
end of the program and getting everything all 
set up. The stuff that actually gets done dur- 
ing the game will come earlier on in the pro- 
gram listing, because Atari BASIC is set up 
to do the things that come early faster 

1000; This is the routine to move the in- 
vaders from INV$ to the screen. Apart from 
moving it to here, we've also changed it so 
that the variable SB will determine the screen 
version that will be printed. SB is equal to 
zero for the first screen (ADR(INV$)+0= 
INV$(1,1)) and, for now, 240 for the second 
screen (ADR(IN V$) +240 =INV$(241,241)) . 

1080; After we print a particular screen, 
we want to change SB so that the other screen 
will be printed next time around. This line 
simply switches SB between zero and 240. 
(SB=0) is equal to one if SB=0 and if 
SBOO. 
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1280; COARSE is a variable that we use 
to keep track of how many characters we've 
coarse scrolled by so far. We are only wor- 
rying about moving the invaders from side 
to side at this point, and we want to make 
sure that they don't go off the edge of the 
screen. So, we change the direction that 
they're scrolling in when COARSE gets too 
high (they've reached the right-hand limit) or 
too low (they've reached the left-hand limit). 
CHANGE tells what direction they're going 
in and is equal to one for right and minus one 
for left. Location 1791 is used in the machine- 
language scroll routine (called SCROLL) and 
also keeps track of direction. It is equal to 
128 for right and one for left. We'll be going 
into more detail on exactly how SCROLL 
works later. 

1330; The variable SCROLL keeps track 
of the amount of fine scrolling that has been 
done. I mentioned before that there is a 
memory location that takes care of fine scroll- 
ing. Actually, there are two. HSCROL at lo- 
cation 54276 takes care of horizontal scrolling 
and VSCROL at location 54277 takes care of 
vertical scrolling. As it turns out, our 
machine-language SCROLL will take care of 
both of these locations, but regardless of this, 
you can only POKE them, you can't PEEK 
(well you can, but you won't get the same 
values you POKEd). That means that you 
have to keep track of their values in your own 
variables, which is what the variable 
SCROLL does. 

1340; When we have fine scrolled 16 tunes, 
we will have gone past the fine scrolling limit 
and must do a coarse scroll. In this line, we 
reset the variable SCROLL (which we will 
later use to reset the fine scrolling) and up- 
date COARSE. Location 1790 tells our 
machine-language routine that we want to 
coarse scroll by two characters in the direc- 
tion specified by location 1791 (see line 
1280). Having taken care of all of these, we 
then skip ahead to line 1360. 

1350; If we're scrolling in the other direc- 
tion, then we want to do the exact opposite 
when we've fine scrolled down to zero. We 
set the variable SCROLL to 15, update 
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COARSE in the opposite direction, and again 
set location 1790. 

1360; Location 1789 tells the machine- 
language routine the value to store in 
HSCROL, and if the value in location 1788 
is not zero, then the routine knows that some- 
thing needs to be done. 

1380; Now we wait until the routine is 
finished. 

1390; And then we go back to line 1000 to 
do the whole thing all over again with the next 
invader screen. 

3010; We're going to be making some 
changes to the display list, so we turn off the 
screen temporarily to avoid a mess. 

3040; VBLOFF$ will hold a machine- 
language routine that is used to turn off our 
VBLANK routines. SCROLL is a VBLANK 
routine, so we may as well set up and in- 
troduce VBLOFF now. 

3160-3170; Here we set up SCROLL itself. 
The way that SCROLL works, it has to be 
stored in memory, not in a string. But it has 
been designed so that it can go anywhere in 
memory, so we'll put it right below the 
character set, since we've already made sure 
that part of memory is reserved. 

4000; Now we actually set up our initial 
graphics mode and tell the computer where 
the character set is. 

5010; We find out where the display list is. 

5020; And change the first line (the one 
that also tells where screen memory is) to a 
fine scrolling line. 

5030; Now we change the next 11 lines as 
well. 

5200; Our changes are complete, so we 
turn the screen back on. 

5270; Here we initialize our variables (their 
uses are explained in the earlier part of the 
listing). 

5290; This just makes sure that the scroll- 
ing register is initially zero. 

5360; Now we initialize the machine- 
language routine SCROLL. 

5460; This turns on SCROLL. The 
CA-256 in the USR command is to tell where 
SCROLL is located in memory. 

5490; We're all done setting things up, so 



go and start the actual movement routine. 

29000; This is VBLOFF. 

31000; This is SCROLL. 

31500; This is SCRLON, the routine to 
turn on SCROLL. 

If you're curious about SCROLL, the 
machine-language routine that we're using 
here, you may wish to skip ahead and take 
a look at the complete explanation of it. I'm 
leaving it until the end because at this point 
it should be fairly straightforward as to how 
it is used in our program, and there are more 
important problems that I'm sure you've al- 
ready run across that I feel should be ex- 
plained first. 

Assuming you've made the previous addi- 
tions to the program and have gotten it run- 
ning, you're probably wondering what's going 
on. After all, the invaders are no longer neat- 
ly lined up on the screen any more, are they? 
Don't worry, you didn't do anything wrong. 
The problem comes from the fact that we are 
now fine scrolling. 

When you fine scroll horizontally, the com- 
puter makes each scrolling line longer than, 
in the case of graphics mode one and two, 
20 characters per line. To be exact, it makes 
these lines 24 characters long (48 in graph- 
ics mode zero). Why? 

Let's suppose you scroll a normal width 
line two characters to the right. What is the 
computer supposed to put on the left edge of 
that line? The same is true for scrolling to 
the left. The computer has to have two extra 
characters on either side of each scrolling line 
in order to have something to scroll onto the 
left or right side of the line. Thus the extra 
four characters. When we set up INV$, we 
thought there would only be 20 characters on 
a line, and that's why the invaders are now 
spread all across the screen. 

Our solution? We change the program so 
that INV$ is set up with 24 characters per line 
instead of 20. We'll do this by adding two 
spaces at the beginning and end of each line: 



1680 X=U5RCflDRfM0UMEM$J, 
fiDR CINU$) +5B, MEMl, 2833 
1088 5B=288»C5Br:ej 
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3030 DIH MLANG$C90},INU$ 

(576), DATS C16J 

5370 lNUS="¥":IMUSt576)= 

"¥"!lNU$t2)=INU$ 

5390 FOR LP=0 TO 4 5TEP 

2:REftD DATS:INU$CLP»48+3 

,LP*48+18J=DflT$:INV$CLP» 
48+339, LP»48+354)=DATS 
5400 READ DAT$ : INU$ CLPW4 
8+51, LP*48+66) =DftT$ : INU$ 
CLP*48+291, LP»48 + 3063 =Dft 
T$:NEXT LP 



Here's the explanation of these changes: 

1000-1080; We've added four characters to 
each of the 12 lines that make up each screen, 
so we have to add 48 (4*12) to the values in 
these lines. 

3030-5370; An additional 48 characters per 
screen, times two screens, means an addition- 
al 96 characters altogether for INV$. 

5390-5400; What have we done here? 
We're multiplying LP by 48 now (24*2), have 
shifted the beginning position of each row of 
invaders by two to give us the extra two 
spaces at the beginning of each line, and the 
second screen now begins an extra 48 charac- 
ters into the string. 

How do things look now, a little better? As 
you can see though, there's still a problem. 
As the invaders scroll to the right, a pair of 
characters that don't belong appear at the top 
left-hand corner of the screen. Before I tell 
you why and how to correct it, I'd like you 
to think about it. You should be able to come 
up with the answer yourself, based on every- 
thing we've talked about so far. 

Give up, or did you figure it out? Either 
way, the problem comes from the fact that the 
computer is trying to scroll on information 
that doesn't exist. When you first set up a 
graphics mode, the computer sets aside an 
area of memory for use as screen memory. 
The memory right before this screen memory 
usually holds the display list. Anyway, when 
you coarse scroll far enough so that screen 
memory now begins before the point it origi- 
nally began at, you start getting strange stuff 
appearing on the screen. 

That's our problem now. How do we get 
rid of it? We can do one of two things. If we 
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change things so that the first line on the 

screen doesn't scroll, and start printing our 
invaders on the second line, we'll be okay. 
This way, we would be backing up screen 
memory into the first line, which we know 
is full of spaces. 

The other way is to change the initial screen 
memory address so that it points ahead in 
memory. That way we know the memory be- 
fore it (which used to be screen memory) is 
also full of spaces. Which of these methods 
is best? In this case I tend to favor the second, 
because it's just a little easier to do and also 
because it will come in handy later in the pro- 
gram. Also, with the first method you don't 
get to use the first line for scrolling. As it 
turns out, we won't want to anyway, but it is 
something to keep in mind. So, without any 
further ado, here are the changes necessary 
to move the screen memory forward: 



5038 l.=PEEKCDLI5T+4)+44: 

POKE DLIST+5,PEEK(DLIST+ 

5)+CL>255) :P0KE DLIST+4, 

L-256*CL>255) 

5040 FOR LIHE=2 TO 12:P0 

KE DLI5T+4+LlNE,22:HEXT 

LINE 

5180 MEMl=PEEKtDLI5T+4J+ 

PEEKCDLIST+5)»256 



And, of course, the explanation. 

5030; Here we make the changes to the 
screen memory address, which is stored at 
the beginning of the display list. See next 
month's column to have this make more sense 
to you. 

5040; This is just the old line 5030. 

5180; We now find out where screen 
memory is from the display list, not the oper- 
ating system (which is what locations 88 and 
89 are for). 

Ta-da! We're now all cleaned up and look- 
ing good. This is all we're going to do with 
the invaders for now. It will make life easier 
for us later when we're figuring out some of 
the logic. As a matter of fact, we won't pro- 
gram them to move down the screen until 
we're almost finished with the program. For 
now, it's important that the invaders just go 



back and forth forever so that we can keep 
them under control. 

Even though we're done with the program- 
ming part of this column, there's still more 
do discuss. First of all, I should explain 
SCROLL, as promised. SCROLL is a 
VBLANK routine to do fine and coarse 
scrolling for you. VBLANK stands for Ver- 
tical BLANK, which happens 60 times a se- 
cond and is the time during which the 
electron beam is on its way from the bottom 
of the screen back to the top (see the column 
on Video Magic). 

During VBLANK, there are no changes 
being made to the television screen, so it is 
a good time to make changes to the display 
list and screen memory. In this case, we're 
making changes to the display list. If we did 
not make these changes during VBLANK, 
the screen would "jump" while you were 
making them. Anyway, this is all just to satis- 
fy your possible curiosity; you don't have to 
worry about the details since I've already 
taken care of them for you. All that you have 
to deal with is how the SCROLL routine is 
used. 

You've seen in the above program listings 
how to set SCROLL up and turn it on. Once 
you turn it on, it will just sit and wait for you 
to tell it what to do. And how do you tell it 
what to do? By setting two or more of five 
memory locations. Here are those locations 
and their meanings: 

1787; This location tells SCROLL when 
you want to do something. You set it to one 
after you've set the next four locations (em- 
phasis on the "after"). 

1788; This location is used to set the 
horizontal fine scroll register. Just store the 
value you want in the register here (and then 
set location 1787 to one). 

1789; This is the same as 1788, except for 
the vertical fine scrolling register. 

1790; This location is used to specify the 
number of bytes you want to coarse scroll by. 
Set it when you're ready to coarse scroll. 

1791; Finally, this locafion is used to tell 
SCROLL what direction to coarse scroll in. 
Set it to one for left and up, and 128 for right 
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and down. 

Every VBLANK, SCROLL will check lo- 
cation 1787 to see if it's set to one. If it isn't, 
then that's all SCROLL does. If it is, then 
it takes the values in locations 1788 and 1789 
and stores them in the fine scroll registers. 
Then it checks to see if location 1790 is equal 
to zero, in which case it sets location 1787 
back to zero and stops. If it isn't set to zero, 
then that means you want to coarse scroll, so 
it goes through the display list and updates 
all the fine scrolling screen memory address- 
es. Then it sets locations 1787 and 1790 back 
to zero and waits for your next command. 

Let me answer a quesUon that you may 
have: Why can't the fine scroll registers be 
changed directly? Why does SCROLL have 
to do it? Well, it doesn't. Try making this 
temporary change to our program: 

1355 POKE 54276, SCROLL 

Now you're changing the horizontal fine 
scroll register directly. Do you notice the oc- 
casional flicker on the screen? That's why we 
use SCROLL for this. 




screen. The solution is also similar to that 
for horizontal scrolling, and it is to add an 
extra line at the bottom of the screen, one that 
does not scroll. 

This line then tends to act as a buffer and 
gives the screen a place to get the extra in- 
formation from. So when you're setting up 
your display list for a screen that is to be fine 
scrolled vertically, remember to add an ex- 
tra line at the bottom of the screen, one that 
isn't set up for scrolling. 

The last thing we're going to cover here is 
how to set up screens for games like Scram- 
ble and Eastern Front, where they are much 
larger than the display screen. For example, 
let's suppose that you want to design a game 
in graphics mode one where the entire game 
screen is 40 characters wide and 48 charac- 
ters high (two display screens wide by two 
high). First of all, this means that you will 
need four times as much screen memory as 
a regular graphics mode one screen. How do 
you get this memory? One way is to just 
reserve it at the top of memory, just like you 
reserve space for a character set. There is, 
however, an easier way, at least in this case. 
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NO. OF ROWS 


24 


24 


12 


24 


48 


48 


96 


96 


192 


192 


TOTAL SCREEN BYTES 


960 


480 


240 


240 


480 


960 


1920 


3840 


7680 


7680 


TOTAL MODE BYTES 






















(NORMAL SCREEN) 


992 


672 


420 


432 


696 


1176 


2184 


4200 


8138 


8138 


(SPLIT SCREEN) 


— 


674 


424 


434 


694 


1174 


2174 


4190 


8112 





It's now time to take care of a few details 
about scrolling that BASIC invaders doesn't 
really get into. First of all, our demonstra- 
tion game does not use vertical fine scroll- 
ing, and chances are that may not be the case 
with a game of your own. We've already seen 
that vertical scrolling is basically the same 
as horizontal, with the exception that we have 
to coarse scroll by a whole line instead of one 
character. 

But there is also another difference be- 
tween the two. You recall that we ran into the 
problem of needing a wider screen for our 
horizontal scrolling. The same type of 
problem exists with vertical scrolling, except 
it is only a problem at the bottom of the 



In Table 6 you'll find a chart that lists a 
whole bunch of information about the vari- 
ous graphics modes. One of these pieces of 
information is the amount of screen memory 
that the graphics modes use, and you'll see 
that graphics mode one uses 480 bytes 
(20*24). We need enough memory to store 
48 lines of 40 characters each, or a total of 
1920 bytes. 

Looking at the chart again, we see that 
graphics mode six happens to use 1920 bytes 
for screen memory (usually you won't get an 
exact match, so you'd pick whatever mode 
came closest without going under). So if we 
set up a graphics mode six screen, we'll have 
the right number of bytes already set up for 



us. Of course we will have to change the dis- 
play list but, as you'll see in next month's 
column, that's a piece of cake. 

Once screen memory has been set up, the 
next step is set up the display list so that ev- 
ery line (except the last one, remember) is 
set to scroll vertically and horizontally, and 
also specifies a section of screen memory. 
Each of these screen memory addresses will 
be 48 bytes past the previous one, since that's 
how long our new lines are. 

The final step before we actually begin to 
scroll is to set up the screen data in screen 
memory. This is just a matter of figuring out 
how you want the screen to look on paper (or 
design it a display screen at a time on the 
computer). From there, transfer the data into 
a string (remembering that the first 48 bytes 
of the string will be the first line of the 
screen), and then use MOVMEM to move the 
string data into the screen memory. 

With all this taken care of, you're now 
ready to scroll around your new giant screen. 
This is the easy part, since SCROLL takes 
care of all the work for you. All you have to 
do is tell SCROLL when to scroll, and also 
keep track of how far you've scrolled, both 
vertically and horizontally, so you don't run 
off the edge of your screen. You can do this 
very simply by keeping two variables, say 
VCOARSE and HCOARSE. At any given 
time, these variables should show how many 
bytes you've scrolled down and how many 
you've scrolled right, respectively (you 
should update them every time you coarse 
scroll, just like we updated COARSE in our 
previous program). 

In the case of our example, you don't want 
VCOARSE to get greater than 24, or 
HCOARSE to get greater than 16. Why not 
48 and 40? When VCOARSE gets to 24, 24 
lines will have already scrolled off the screen 
and there will be 24 lines on the screen, for 
our total of 48. Similarly, when HCOARSE 
gets to 16, 16 lines will have scrolled off the 
screen, and 24 will be on, for our total of 40. 
Well, that about does it for fine scrolling. 
Of course, I still haven't explained the dis- 
play list. We'll cover that topic next month. 
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LlLl-l_L PARTIV 
How to read the Memory Map 

Beginning users: Read the text that is 
printed in bold type only. These memory 
locations will be the easiest for you to use 
and usually don't involve assembly 
language. 

Advanced users: Read everything! Many 
areas of memory are not of any practical 
use, but you can learn a lot about how a 
computer works by reading the boring 
parts. 



RUNSTK 
142,143 



008E,008F 



This one is a pointer to the runtime stack. 
What is a "runtime stack"? Let's start off 
with a quick explanation of a stack. 

Ever seen a stack of trays in a cafeteria? 
Customers take trays off the top; cafeteria 
people put trays on the top. If you're not 
lucky, there'll be a mad rush of people, and 
by the time you get to the stack there will 
be none left, and the cafeteria people will 
be nowhere to be seen. Well, a computer 
stack is the same thing, except it uses 
memory locations instead of trays, and 
there are no cafeteria people. A special 
memory location is used to point to the cur- 
rent top of the stack. 

Now you know what a stack is, so let's 
talk about the runtime stack. Runtime just 
means that it's used while the program is 
running. When you use a GOSUB or a 
FOR/NEXT loop, BASIC has to be able 
to remember certain things, so it puts them 
on the stack until it needs to refresh its 
memor)'. Now you need to know what ex- 
actly gets put on the stack. 

For each GOSUB encountered, four 
bytes are put on the stack (they are taken 
off when BASIC RETURNS from the 
subroutine). The first byte is a zero and 
tells BASIC that this is a GOSUB. The se- 
cond and third give the line number that 
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the GOSUB was on, and the last one is an 
offset into the line so that BASIC knows 
where to continue from after the 
RETURN. 

FOR/NEXT loops are a little more com- 
plicated; they require 16 bytes to be put on 
the stack. The first six bytes give the num- 
ber (in BCD) that the counter in the loop 
can go up to. The second six give the STEP 
value (also in BCD). The 13th byte gives 



the variable number plus 128 of the coun- 
ter variable. The next two give the line 
number that the FOR statement was on, 
and the last one gives the offset within that 
line of the FOR. These values remain on 
the stack until the FOR/NEXT loop is 
complete. 

There is one exception to the preceding 
two paragraphs. A BASIC POP statement 
will take the top entry off the stack, be it 
a. GOSUB for a FOR/NEXT. You should 
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make sure you POP the stack if you have LSTPNT 



to leave a FOR/NEXT loop before it's 
finished or a GOSUB before the RETURN. 

Don't forget that the stack is constantly 
changing, so its size will vary. 

Lastly, since the beginning of the run- 
time stack is also the end of the string/array 
area, BASIC also calls it ENDSTAR. 
Okay? 



MEMTOP 
144,145 



0090,0091 



Two uses for this one. First, relevant 
to the last location, MEMTOP is also 
called TOPSTK and points to the end of 
the runtime stack. Since the runtime 
stack is the last section of memory used 
by your BASIC program, MEMTOP is 
a pointer to the end of your BASIC pro- 
gram (which makes sense, right?). The 
memory locations from the address in 
MEMTOP plus one, all the way up to the 
display list (see SDLSTL [560,561]), are 
free for your use (but don't forget that 
the value in MEMTOP will change dur- 
ing program execution, since the run- 
time stack will be growing and 
shrinking). 

For those of you who are still alert, 
don't confuse this MEMTOP with the 
MEMTOP at 741 and 742. This is the 
BASIC MEMTOP; the other is the OS 
MEMTOR 

The BASIC cartridge uses locations 
146 to 202 for various uses, not all of 
which are worthwhile reporting on — 
with the following exceptions, of course: 



FORLN 
160,161 



OOAO,OOA1 



FORLN holds the line number of the 
current FOR statement encountered. 
For example: 

100 FOR X=1 TO 25 

110 NEXT X 

120 PRINT PEEK(160)+PEEK(161)*256 
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173,174 



OOAD,00AE 



List pointer. Contains the location of 
the line being LISTed. When you just 
type LIST, you find 32767 here. 



DATLN 

182 



00B6 



Points to the number of the item wi- 
thin the DATA statement. This means we 
are currently reading the first number, 
the second, etc. Try this program: 

10 FOR 1=1 TO 8 

20 READ A 

30 ? PEEK(182) 

40 NEXT I 

50 DATA 1,2,3,4,5,6,7 



DATALN 
183,184 



OOB7,O0B8 



DATALN holds the line number of the 
DATA statement that was last READ. For 
example: 

100 READ A 

110 PRINT PEEK(183)+PEEK(184)*256 

1000 DATA 10 

You can use DATALN in an error- 
trapping routine to find out where a 
READ error occurred. 



STOPLN 

186,187 



OOBA,OOBB 



STOPLN holds the line number that 
the program was on when the program 
stopped, the BREAK key was pressed or 
an error was trapped. It is also useful 
in error-trapping routines. Now for our 
example: 

100 TRAP 30000 

no NEXT Y 

30000 PRINT PEEK(186)+PEEK(187)*256 



ERRSAV 
195 



00C3 



This location holds the number of the 
error that was trapped or caused the 
program to stop. 



PTABW 

201 



00C9 



When you print a whole bunch of 
items and separate them by commas in 
the PRINT statement (like PRINT 
A,B,C$), they get printed on the screen 
with a bunch of spaces in between them, 
right? Well, PTABW tells how many 
spaces to separate them by. In technical 
terms, that means it tells how many 
spaces there are between each tab stop 
on the screen (see TABMAP [675 to 689] 
if you want to set tabs for the TAB key). 
It can be set to any value from three to 
255 but is initialized to ten. Let's look 
at an example: 

100 PRINT 1,2,3 
110 POKE 201,5 
120 PRINT 1,2,3 

SYSTEM RESET doesn't restore 
PTABW to its original value; GRAPH- 
ICS doesn't; nothing does. This is a very 
durable location. 

Pokeing a zero here will cause the 
Atari to lock up shop when it encoun- 
ters a comma in a PRINT statement. 



BININT 
202 



OOCA 



If you put anything other than a zero 
here, then going into the immediate 
mode (i.e., SYSTEM RESET, BREAK 
or the program ending) causes the pro- 
gram currently in memory to erase 
itself— yet another fun way to prevent 
people from looking at your program (I 
personally like this one; it's devious). 

Noname 
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A floating point register is just a pi ice used to 
hold floating point numbers while operations are 

performed on them. 



203-209 OOCB-OODl 

These locations are free, free, free for 
your use if you're programming in BASIC. 
If you're using a different language, check 
the accompanying documentation to find 
out which page zero locations it leaves free. 



Noname 
210,211 



00D2,00D3 



These two locations are reserved for BA- 
SIC, which means they have no specific use 
but you should stay away from them. 

The floating point package 

The remaining page zero locations from 
212 to 255 are used by the OS's floating 
point package, a whole bunch of subrou- 
tines that BASIC uses when doing math and 
that kind of stuff. The routines themselves 
are stored in the OS ROM, so if you don't 
use them at all in your program, these lo- 
cations will be free. Don't count on it 
though, even if you think you're not using 
the routines. They can sneak up on you 
when you least expect it. 

Floating point math uses six-byte BCD, 
which was explained briefly under location 
VVTP (134,135). See the section in "De 
Re Atari" on the floating point package for 
more information. 

Unfortunately, the listing for the float- 
ing point package is mighty hard to come 
by, so some of these locations are going to 
have real short explanations. My apologies 
to you, and my thanks to the OS Manual 
and Mapping the Atari for the information 
I couldn't find anywhere else. 



FRO 
212-217 



00D4-00D9 



Floating point register zero. A floating 
point register is just a place used to hold 
floating point numbers while operations are 
performed on them (it may also hold a par- 
tial result of an operation). They are all, 
including FRO of course, six bytes long, 
since they must hold a six-byte BCD 
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representation of the number. 

FRO is also used by the USR command. 
Remember that USR has the format 
X=USR (address [.argument] [,...]) where 
X can be any variable and the arguments 
are optional. If you want your machine- 
language routine to give a value to X, you 
should store that value in the first two bytes 
of FRO (212,213 —low byte and high byte 
respectively) before your RTS statement. 
BASIC will automatically convert these 
bytes into a floating point number and store 
it in X (or whatever variable you used for 
the call). If you're not using BASIC, you 
can use FRO yourself to convert binary 
values to floating point and vice versa. Put 
the binary number in locations $D4 and 
$D5 and then JSR $D9AA to convert to 
floating point (the result will be stored in 
FRO). To convert back, JSR $D9D2. Note 
that you can't use these routines from 
BASIC since BASIC is constantly using 
FRO and will mess up your values. 



FRE 

218-223 



OODA-OODF 



This isn't very well documented, but it 
appears to be an extra floating point 
register. 



FRl 

224-229 



00E0-00E5 



Floating point Register 1. FRl has the 
same format as FRO and is often used in 
conjunction with it, especially for two- 
number arithmetic. 



FR2 

230-235 



00E6-00EB 



Floating point Register 2. 



FRX 
236 



OOEC 



A single-byte register used for single- 
byte calculations. 



EEXP 

237 



OOED 



The value of the exponent (E). I suspect 
this is the exponent of the floating point 
number currentiy being processed, but this 
is only a suspicion. 



NSIGN 
238 



OOEE 



The sign of the floating point number 
(same suspicion as above). 



ESIGN 

239 



OOEF 



The sign of the exponent in EEXP (237). 



FCHRFL 
240 



OOFO 



The first character flag. Your guess is as 
good as mine. 



DIGRT 

241 



OOFl 



The number of digits to the right of the 
decimal point (zero to eight). 



CIX 

242 



00F2 



An offset into the text buffer pointed to 
by INBUFR 



INBUFF 
243,244 



00F3,00F4 



Finally something that can be under- 
stood! There are times when BASIC has 
to convert an ATASCII representation of a 
number to the corresponding floating point 
value (like when you type in X=1000). IN- 
BUFF points to a buffer used to hold the 
ATASCII representation. The result gets 
stored in FRO. See LBUFF (1408 to 1535) 
for the buffer itself. 






ZTEMPl 

245,246 00F5,00F6 

A temporary register. 

ZTEMP4 

247,248 O0F7,0OF8 

Another temporary register. 
ZTEMP3 



249,250 



00F9,00FA 



Still another temporary register (will it 
never end?). 

RADFLG 

251 OOFB 



RADFLG determines whether the 
trigonometric functions (SIN, COS, etc.) 
are performed in radians or degrees. If it's 
zero, then radians are used. If it's six, then 
degrees are in fashion. SYSTEM RESET 
and NEW both restore RADFLG to radi- 
ans (zero). 

BASIC also calls this location DEGFLG. 



FLPTR 

252,253 



OOFCOOFD 



FLPTR holds the address of the float- 
ing point number that the package is now 
operating on. FLPTR and FPTR2 (to fol- 
low) point to the addresses where the 
results of the current operation will be 
stored. The documentation is sketchy 
though, so I'm just making an educated 
guess. 



FPTR2 

254,255 



OOFE,OOFF 



FPTR2 holds the address of the second 
floating point number that the package is 
operating on. 

Page one 

Locations 256 to 511 are called page one 
and have a very important use. They make 



up the stack for the OS, BASIC and DOS 
(see RUNSTK at locations 142 and 143 for 
an explanation of what a stack is). On 
powerup (and on SYSTEM RESET), the 
stack pointer is set to 511. Each time a 
machine-language JSR or PHA (PusH Ac- 
cumulator on stack) instruction is execut- 
ed, data is put on the stack and the pointer 
moved downward accordingly. When an 
RTS or PLA (PuLI Accumulator from 
stack) is executed, the corresponding data 
is pulled off the stack and the pointer 
moved back up. Since the stack pointer 
(which is a special location built into the 
main part of the computer) is just one byte, 
if you try and move it below location 256, 
it will wrap back around to Location 511 
and vice versa. 



Pages two through four 

Locations 512 to 1151, as you will see, are 
used by the OS as a workspace. Some are 
used for variables, some for tables, some 
tor vectors, some for buffers and some just 
for miscellaneous stuff. Now, a few words 
on using these locations. Don't, unless the 
description says you can! A lot of them are 
very important to the OS, and if you mess 
with them, they may cause the computer 
to crash, which you don't want to happen. 
Keep in mind, though, that no matter what 
you do, you can't hurt the computer (un- 
less you throw it at a wall in frustration). 
You'll just hurt your program. 

Also, be careful of locations that don't ap- 
pear to be used. Atari has warned that these 
locations may be used in future versions of 
the OS, so stay away if you want to make sure 
your programs will work on all machines. 

Let's jump right into page two. The first 
42 bytes are used for interrupt vectors, so 
we'd better take a quick look at interrupts. 
As you remember, we first saw interrupts at 
location POKMSK (16). If you don't remem- 
ber, go back and reread that section. I'll wait 
for you here. . . . 

Back again? Okay, so now we have the ba- 
sic idea of what an interrupt is. The type of 
interrupt we saw at POKMSK is called an In- 
terrupt ReQuest (IRQ). There's another kind 



of interrupt called a Non-Maskable Interrupt 
(NMI). What's the difference? Well, there's 
an assembly-language command called SEI 
(SEt Interrupt disable). It tells the 6502 (the 
main chip) to ignore IRQ-type interrupts. Un- 
fortunately, it can't tell the 6502 to ignore the 
NMIs. They are taken care of by another 
chip, called ANTIC, and so ANTIC is where 
you must go if you want to ignore NMIs. 

The NMIs consist of the Vertical Blank In- 
terrupt (VBI), the Display List Interrupt 
(DLI) and the SYSTEM RESET interrupt. 
We'll be seeing the interrupt vectors for both 
IRQs and NMIs in the next few locations, 
along with how to use them. An interrupt 
vector tells the OS where to go when the cor- 
responding interrupt occurs (assuming it 
hasn't been disabled). 

You might also want to look at IRQEN 
(53774), NMIEN (54286) and NMIST 
(54287) for more information on interrupts. 



VDSLST 
512,513 



0200,0201 



This is the vector for the Display List In- 
terrupt (DLI) ,which is an NMI, as we dis- 
cussed in the last location. DLIs interrupt 
the screen drawing process so you can do 
things like change the screen color halfway 
down. They exist entirely for your benefit; 
the OS doesn't use them at all. 

To get a DLI going, there are a couple 
of things you have to do. First, and most 
important, you have to decide what you 
want the interrupt to do! Write the routine 
to do it, making sure it ends with an RTI 
(ReT\irn from Interrupt) instruction. Next, 
decide which row on the screen you want 
it to occur at (it will actually occur at the 
end of this row). Go into the display list 
and set the leftmost bit (bit seven) of the 
instruction for that row. That tells the dis- 
play list that there is to be a DLI on this 
row. Now tell the OS where the DLI rou- 
tine is by setting VDSLST (low byte and 
high byte of the routine address). Finally, 
you have to enable the DLIs. Do this by set- 
ting NMIEN (54286) to 192. 
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DLIs are powerful They can be used to change 

colors, to change character sets, even to change 

player/missile positions and the fine scrolling 

registers. 



Here's a quick example from BASIC, mers by now, this is most definitely 
simply reversing the playfield colors half- machine-language country. It's not very 
way down the screen: difficult machine language, but it is 

machine language. 



100 GRAPHICS 

no DL I ST=PEEK(560)+PEEK(561 )*256 

120 POKE DLIST+16,130 

130 FOR MEM=1536 TO 1553 

140 READ INSTR 

150 POKE MEM, INSTR 

160 NEXT MEM 

170 POKE 512,0:P0KE 513,6:P0KE 54286 

,192 

180 LIST 

190 DATA 72,173,198,2,141,10,212,141 

,23,208 

200 DATA 173,197,2,141,24,208,104,64 



Make sure that the DATA is correct be- 
fore you run the program. If it isn't, the 
computer might lock up. Here's an assem- 
bly listing of what those DATA statements 
represent: 

0600 48 PHA 

0601 ADC602 LDA C0L0R2 
0604 8D0AD4 STA WSYNC 
0607 8D17D0 STA COLPFl 
060A ADC502 LDA COLOR 1 
060D 801 8D0 STA C0LPF2 

0610 68 PLA 

0611 40 RTI 



Now that you know the basics, let me tell 
you a few limitations. First of all, there is 
very little time available during a DLI be- 
fore the next row starts to get drawn. Make 
your routine short. Second, because an in- 
terrupt often occurs while something else 
is going on Oike your BASIC program run- 
ning), you have to make sure that you re- 
store the accumulator and the X and Y 
registers if you use them. Do this by push- 
ing their values onto the stack before you 
use them and then pulling the values back 
off before you RTI. Finally, as should be 
painfully obvious to you BASIC program- 



A few notes now for the machine-language 
programmers. Change the hardware regis- 
ters, not the shadow registers. The shadow 
registers are used to update the hardware 
registers during VBLANK. Changing them 
halfway down the screen won't have any ef- 
fect until VBLANK kicks in. 

If you're going to have more than one 
DLI, then each DLI routine will have to 
reload VDSLST to point to the next one. 
The last one will have to point back to the 
first one. Make sure in this case that you 
enable the DLIs during VBLANK, or else 
they may not execute in the right order. 



Use WSYNC (54282) if you're changing 
screen colors. When any value is stored in 
WSYNC, the next command won't be execut- 
ed until the TV has finished drawing the cur- 
rent scan line. If you don't use it, your colors 
will change in the middle of a line and will 
flicker baclc and forth. Try it and see for your- 
self (get rid of "141,10,212" in Line 190 and 
change "1553" in Line 130 to "1550"). 

One other problem with DLIs is that press- 
ing a key on the keyboard can cause DLI 
colors to "jump" down a scan line (try it). 
The solution? Well, the easiest is just not to 
use the keyboard. For more complex ways 
around it, you should consult "De Re Atari." 

DLIs are extremely powerful. They can be 
used to change colors, to change character 
sets, even to change player/missile positions 
and the fine scrolling registers; so be crea- 
tive. Proper use of DLIs can produce a pro- 
gram that will do things you never thought 
the Atari was capable of. 



VPRCED 

514,515 



0202,0203 



This one's an IRQ vector, for an interrupt 
called the "serial proceed line interrupt," 
where the word "serial" indicates I/O to a 



peripheral such as the disk drive. It is initial- 
ized to 59314, which just holds a PLA and 
an RTI (i.e., the interrupt is used). 



VINTER 
516,517 



0204,0205 



Another IRQ, this time for the "serial bus 
I/O interrupt." Initialized to 59314 again be- 
cause it isn't normally used. Both VINTER 
and VPRCED's interrupts are processed by 
the PIA (Peripheral Interface Adapter) chip. 



VBREAK 
518,519 



0206,0207 



IRQ again, for the machine-language BRK 

command [which is not the same as the 
BREAK key; see POKMSK (16) and 
BRKKEY (17)]. It's also initialized to 59314. 



VKEYBD 
520,521 



0208,0209 



From now on, if I don't tell you what kind 
of interrupt it is, it's an IRQ , okay? There's 
a whole bunch of these suckers and only so 
many ways to say "here's another IRQ." 

So here's another IRQ. This one occurs 
whenever a key other than BREAK is pressed 
(START OPTION and SELECT don't count 
because they're buttons, not keys). It's initial- 
ized to 65470, which is the OS keyboard IRQ 
routine (it makes sure that only one charac- 
ter gets printed when you press a key, and 
resets ATRACT [77]). If you want to put your 
own routine in, this is the place to do it. Keep 
in mind, however, that your routine will be 
executed before the key code gets converted 
to ATASCII (see the OS manual for a list of 
key codes). 

The following three vectors are used to 
control communication between the serial bus 
and the serial bus devices (serial refers to the 
fact that bits are sent or received one after 
the other in succession). A much simplified 
explanation of this process follows. You 
should consuh "De Re Atari" if you need 
more details. 

The data being sent or received is stored 
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in a buffer. If we're doing output, then a byte 
gets transferred from the buffer over to the 
serial output register (an interrupt routine 
does this). SIO takes it from there and puts 
it in POKEY's serial output shift register. 
POKEY then picks it up and sends it out one 
bit at a time. An interrupt is then generated, 
and the whole process starts over. This goes 
on until the checksum byte has been sent, at 
which time a "transmit done" interrupt is 
generated and SIO hands control back to the 
main program, which has been waiting pa- 
tiently all this time. 

The process is pretty much the same if 
we're receiving data, except in reverse. 



VSERIN 

522,523 



020A,020B 



This is a good one. The "POKEY serial 
I/O bus receive data ready" interrupt vector. 
It means that this vector is used when the I/O 
bus indicates that it has received a byte that 
is now waiting in the serial input register, 
ready to be moved to a buffer. The routine 
in the OS to do this is at 60177, and that's 
what VSERIN is initialized to. 

VSERIN is also called INTRVEC by DOS, 
which changes its value to 6691, a routine in 
DOS that does pretty much the same thing 
as the one in the OS, except in a different 
place. 



VSEROR 

524,525 



020C,020D 



The opposite of VSERIN, VSEROR is used 
when the I/O bus is ready to send a byte. Its 
official name is the "POKEY serial I/O bus 
transmit data ready" interrupt vector, which 
should make more sense this time. It is ini- 
tialized to 60048, the address of an OS rou- 
tine that, logically, moves the next byte in the 
buffer to the serial output register (from 
whence it gets sent). DOS messes with this 
one too, changing it to 6691, the address of 
its routine to do the same thing. 



VSEROC 

526,527 



Another long-winded name: the "POKEY 
serial I/O bus transmit complete" interrupt 
vector. Since I'm sure you're all becoming ex- 
perts at interpreting these names, it should 
come as no surprise that this vector is used 
when all the data has been sent. It is initial- 
ized to 60113, a routine that, when the check- 
sum byte is sent (see CHKSUM [49]), sets 
the "transmission" done flag at XMTDON 
(58) and disables this kind of interrupt. 

The following three locations are the in- 
terrupt vectors for the POKEY timers, all of 
which are initially unused and therefore set 
to the PLA/RTI combination at location 
59314. The timer interrupt occurs when the 
associated timer counts down to zero. 

For more information on the POKEY 
timers, see the section on timers right before 
location 53760. 



VTIMRl 

528,529 



0210,0211 



Interrupt vector for POKEY Timer 1 (see 
AUDFl [53760,53761]). 



VTIMR2 
530,531 



0212,0213 



Interrupt vector for POKEY Timer 2 (see 
AUDF2 [53762,53763]). 



VTIMR4 

532,533 



0214,0215 



Interrupt vector for POKEY Timer 4 (see 
AUDF4 [53766,53767]). This vector only ex- 
ists in the "B" version of the OS. 



VIMIRQ 

534,535 



0216,0217 



020E,020F 



Every IRQ vectors through this location on 
its way to the individual interrupt routines. 
It is initialized to 59126, the address of an OS 
routine that looks at IRQST (53774) to de- 
termine what kind of interrupt occurred and 
then jumps through the appropriate vector. 



Attention B OS owners! 

Since a lot of addresses in the new "B" 
version of the OS got shifted around, some 
of the initialization addresses given aren't 
the same in that version (which is now in 
a majority of the Ataris out there). Here 
are the changes (Figure 9). 

Software timers 

There are two types of timers in the 
Atari: software and hardware. We've al- 
ready come across the hardware timers (see 
VTIMRl-4 [528-533]), and we're about to 
learn everything we never wanted to know 
about the software timers, which use Lo- 
cations 536 to 558. But first, a few words 
from our author. 

There are, of course, differences between 
software and hardware timers, and you'll 
probably want to know them before you go 
running off into timer land. The biggest 
difference comes from the names. 



VECTOR 


INITIAL VALUE 


VDSLST 


59280 


VPRCED 


59279 


VINTER 


59279 


VBREAK 


59279 


VKEYBD 


same as before 


VSERIN 


60175 


VSEROR 


same as before 


VSEROC 


60111 


VTIMRl-4 


59279 


VIMIRQ 


59142 


VVBLKI 


59310 


VVBLKD 


59653 



Hardware timers are built into the 
POKEY chip; software timers are part of 
RAM. The big difference comes in the way 
they keep time. You recall from location 
RTCLOK (18-20) that a jiffy is /go of a se- 
cond, the amount of time it takes the tele- 
vision set to fill the screen. Well, the 
software timers count down by one every 
jiffy. The hardware timers, on the other 
hand, count down by an amount less than 
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^Mfy i^ ~M- of a second: thafs the time it 
takes the TV set to fill the entire screen with a 

picture. 



a jiffy, which you can specify (see Loca- 
tions 53760 through 53769). So, if you want 
to time things that take longer than a jifiy, 
use the software timers. Otherwise, go for 
the hardware. 



CDTMVl 

536,537 



0218,0219 



This is the first software timer (affection- 
ately known as "System Timer 1"). Every 
VBLANK, the value in CDTMVl gets 
decremented by one. When it reaches zero, 
a flag gets set so the OS knows to JSR 
through CDTMAl (550,551). An important 
thing to note here is that the decrementing 
for this timer (and only this timer) is done 
during Stage 1 VBLANK. This means that 
CDTMVl (along with RTCLOK [18-20] 
and ATRACT [77]) is updated every 
VBLANK, no matter what's going on else- 
where in the computer. The rest of the soft- 
ware timers, on the other hand, are updated 
during Stage 2, which means that during 
time-critical I/O (like disk and cassette I/O; 
see CRITIC [66]), the other times are not 
updated. Unfortunately, the OS knows this 
too, so it uses CDTMVl for I/O routines. 
So, you see, we have a catch-22 situation 
here. Oh, well! If you're doing your own 
time-critical routines though, you know 
which timer to use. 



CDTMV2 

538,539 



021A,021B 



This is System Timer 2, of course. When 
it reaches zero, it JSR's through CDTMA2 
(552,553). And, unless you slept through 
the last paragraph, you should already 
know that it will not be updated during 
time-critical I/O. 



CDTMV3 
540,541 



021C,021D 



The third system timer, again hampered 
by time-critical I/O. This one has problems 
of its own through. First of all, the cassette 
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handler uses it. Secondly, instead of JSRing 
through a vector when it gets down to zero, 
it just clears a flag at CDTMF3 (554). So 
don't use it during cassette operations and 
don't expect it to go anywhere after it's 
done. 



CDTMV4 

542,543 



021E,021F 



Let's see. You've already figured out that 
this is System Timer 4, that it doesn't work 
during time-critical I/O and you may have 
guessed that it clears a flag at CDTMF4 
(556) when it's done instead of vectoring. 
What's left for me to say? 



CDTMV5 

544,545 



0220,0221 



The last of the timers. This one is no 
different than the last one except that the 
flag it clears is at CDTMF5 (558). But 
since you're getting to know these things 
so well, I shouldn't have to tell you that. 



VVBLKI 

546,547 



0222,0223 



Since this is the vector for the VBLANK 
Interrupt (VBI), I suppose this is probably 
a good time to explain exactly what verti- 
cal blank is. With all the previous mentions 
of jiffies in this book, you should know by 
now that a jiffy is y^o of a second. It is im- 
portant because that's the time it takes the 
television set to fill the whole screen with 
a picture. Since the screen can't hold on 
to that picture for very long, the TV keeps 
drawing the picture over and over again, 
even if it doesn't change. It draws it one 
line at a time, from top to bottom. When 
it gets to the bottom, it stops drawing and 
goes back to the top, where it starts all over 
again. Now, the important part for us is 
when it stops drawing. At that time it tells 
the computer, "Hey, I'm not drawing to the 
screen anymore," thus generating a verti- 
cal blank interrupt. You should be able to 



see where the name comes from now. In- 
cidentally, there is also a horizontal blank, 
which occurs while the TV has finished 
drawing one line and is on its way to the be- 
ginning of the next. Store any value in 
WSYMC (54282) and the computer won't do 
anything until the next HBLANK occurs. 

Back to VBLANK. There are a few rea- 
sons why the TV isn't drawing to the screen. 
First of all, it gives us a way to time things, 
since VBLANK occurs precisely every }^o of 
a second. Secondly, nothing is being drawn 
to the screen during this time, so any graph- 
ics changes made during VBLANK will 
result in smooth, instantaneous changes on 
the screen. But, perhaps most importantly, 
VBI code runs independently of mainline 
code. What does that mean? It means that 
VBI code is essentially a separate program, 
running at the same time as your regular pro- 
gram! I wrote one VBI program, for exam- 
ple, that allowed the computer to play music 
at the same time I was typing in programs. 
Chris Crawford, in his classic Eastern Front 
1941 game, used VBI to separate the think- 
ing process of the game from the tedious stuff 
like graphics and user input. That allowed the 
computer to think about its next move at the 
same time the player was thinking about his 
or hers, thus simulating a tnie one-on-one sit- 
uation. As you can see, VBLANK is an ex- 
tremely powerful tool. 

Let's take a closer look at what normally 
goes on during VBI. First of all, there are 
two stages. The first stage is always execut- 
ed, while the second gets ignored if the time- 
vertical I/O flag at CRITIC (66) is set. The 
first is called "immediate" vertical blank, the 
second is "deferred." 

VVBLKI is the vector for the immediate 
stage, so the OS goes through VVBLKI when 
the VBLANK interrupt first occurs. During 
this stage the real-time clock (RTCLOK 
[18-20]), the attract mode (ATRACT [77], 
DRKMSK [78] and COLRSH [79]), and sys- 
tem timer one (CDTMVl [536, 537]) get up- 
dated, processed and so forth. Then CRITIC 
is checked. If it's set, indicating that the in- 
terrupt occurred in the middle of a time- 
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critical I/O operation, the OS returns from 
the interrupt. If it's not, then it's okay to go 
on to Stage 2, so we do. When the OS is done 
with Stage 2, it vectors through VVBLKD 
(548,549) to the user's deferred VBI routine, 
and then finally returns from the interrupt 
when it's done there. 

VVBLKI is initialized to point to SYSVBV 
(58463), which contains a JMP instruction 
to the OS Stage 1 code (located at 59345 in 
the old OS, 59310 in the new one). If you 
change VVBLKI to point to your own rou- 
tine, and you still want the OS code to be ex- 
ecuted, you should end your routine with a 
JMP SYSVBV statement. 

Whew, what a lot of mumbo jumbo! If you 
managed to plod through all of that, take a 
well-deserved rest. When you're done, we'll 
take a look at how you can use vertical blank 
for your own routines. 



VVBLKD 

548,549 



0224,0225 



Don't worry, there's still more to come on 
VBIs! This just seemed like a good time to 
formally introduce VVBLKD, the vector for 
the user's deferred VBI routine. The OS in- 
itializes VVBLKD to its "exit vertical blank" 
routine (at 59710 in the old OS, 59653 in the 
new one). If you use VVBLKD to point to 
your own routine, make sure to end that rou- 
tine with a JMP XITVBL (XITVBL contains 
a JMP instruction to the exit vertical blank 
routine, which means you don't have to wor- 
ry about which OS is being used since 
XITVBL is at 58466 in both). Note that you 
can also avoid the whole entire OS VBI code 
by writing your own immediate VBLANK 
routine and ending it with a JMP XITVBL 
instead of a JMP SYSVBV. Remember that 
none of the timers or color registers or any- 
thing will be updated if you do this (unless 
you update them in your routine). 

By now you're probably either real excit- 
ed over the prospect of using VBIs yourself, 
or you're asleep. If it's the latter, then you're 
not even reading this because your eyes are 
closed, so I'm only going to deal with those 



of you who are excited, okay? Let's look at 
how to write our own VBLANK routines. 
The first step is to decide whether you want 
your routine to be immediate or deferred. 
Most of the time it doesn't matter There are, 
however, the following conditions which will 
require one over the other. 

1. If you want to change locations that the 
OS deferred routine also changes, you obvi- 
ously want to do so after the OS does. Use 
deferred. 

2. The maximum amount of time you can 
spend in hiunediate VBI is 2,000 machme cy- 
cles (see a book on 6502 assembly language 
for information on the number of machine cy- 
cles per instruction). If your routine is go- 
ing to be long, you should therefore put it in 
deferred VBI, which has 20,000 cycles avail- 
able. If you don't, things are going to look 
mighty funny on the screen. If you do use 
deferred, do your graphics first, since some 
of those 20,000 cycles occur while the screen 
is being drawn. 

3. If you need your routine to be executed 
every VBLANK, regardless of whether time- 
critical I/O is occurring, use immediate. Be 
careful, however, that your routine will not 
cause problems with the I/O. 

Now that you've decided what it should be 
(and you've presumably written it and put it 
in memory somewhere), all you need to do 
is change VVBLKI or VVBLKD to point to 
it. A simple task, right? Not quite. What hap- 
pens if a VBI occurs while you're changing 
the vector? Crash city! 

To make sure this doesn't happen, you have 
to change the vectors during VBLANK. But 
that itself presents a small problem. How do 
we get into VBLANK to change the vectors 
if we have to change the vectors to get to 
VBLANK (good old catch-22 again)? Luck- 
ily, Atari has thoughtfully provided a VBI 
routine that makes the change for you. It's 
called SETVBV and is at 58460. To use it, 
load the 6502 Y register (LDY) with the low 
byte of the address for your routine, and load 
the X register (LDX) with the high byte. Then 
load the accumulator (LDA) with a six if you 
want immediate VBI, seven if you want 



deferred, and JSR SETVBV. Now your VBI 
will be up and running. 

Here's a simple example that uses location 
Chact (755) to make inverse text blink: 

100 FOR MEM=1536 TO 1575 

110 READ CODE 

120 POKE MEM.COOE 

130 NEXT MEM 

140 X=USR(1536) 

150 DATA 104,169,0,141,29,2,160,16,1 

62,6,169,6,141,29,2,32 

160 DATA 92,228,96,173,28,2,208,13,1 

69,30,141,28,2,173 

170 DATA 243,2,73,2,141,243,2,76,95, 

228 

Make sure that the DATA values are cor- 
rect before you run the program. If they 
aren't, the computer will probably crash and 
you'll lose the program. 

Here's the assembly-language listing of the 
machine code (which is stored in the DATA 
statements): 



0600 68 


PLA 


0601 A900 


LDA #$00 


0603 801D02 


STA CDTMV3+1 


0606 A010 


LDY #VBLANK&255 


0608 A206 


LDX #VBLANK/256 


060A A906 


LDA tt$06 


060C 801D02 


STA CDTMV3 


060F 205CE4 


JSR SETVBV 


0612 60 


RTS 


0613 AD2C02 


VBLANK LDA CDTMV3 


0616 DODO 


BNE VBLXIT 


0618 A91E 


LDA #$1E 


061A 8D1E02 


STA CDTMV3 


061 D ADF302 


LDA CHACT 


0620 4901 


EOR #$02 


0622 80F302 


STA CHACT 


0625 4C5FE4 


VBLXIT JMP SYSVBV 



The "LDA #$1E" in the preceding listing 
is used to specify a half-second interval ($1E 
hex equals 30 decimal equals 30 jiffies equals 
half a second) for use in blinking. Make it 
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What happens if a VBI occurs while you^re 
changing the vector? 

Crash City! 



larger or smaller to make the interval longer 
or shorter, respectively. 



CDTMAl 
550,551 



0226,0227 



CDTMAl is the vector for System Timer 
1 (CDTMVl [536,537]). It's initialized to 
60400, which is the address of a routine to 
set the time-out flag TIMFLG (791). This is 
because the OS uses CDTMVl for I/O rou- 
tines, which is a very good reason why you 
probably should use Timer 2 instead. 

The OS vectors through CDTMAl when 
CDTMVl counts down to zero. If you do use 
CDTMVl and are setting it for a value greater 
than 255 (i.e. , setting both the low and high 
byte), this presents a potential problem. Since 
CDTMVl is updated during VBLANK, and 
there is a chance that a VBLANK might oc- 
cur while you're setting CDTMVl, you 
should set the low byte first. You can also use 
the SETVBV routine mentioned in the 
VBLANK description preceding. Just LDY 
with the low byte, LDX with the high, LDA 
with the timer number (1-5), and JSR 
SETVBV. This will assure that the timer gets 
set during VBLANK. 

Since the OS JSRs through this vector, you 
should end your routine with an RTS in- 
struction. 

Incidentally, CDTMVl reaching zero 
generates an NMI, which then does the 
vector. 



CDTMA2 

552,553 



0228,0229 



Same as CDTMAl, except this one is not 
used by the OS and is therefore initialized to 
zero. Oh, and of course CDTMV2 (538,539) 
reaching zero causes the vector through here, 
not CDTMVl. But then we already knew 
that, didn't we? 



CDTMF3 

554 



022A 



Unlike system Tuners 1 and 2, Timers 3 
through 5 merely clear a flag when they count 
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down to zero. This is the flag for CDTMV3 
(540,541) and is also used by DOS as a time- 
out flag, so beware of possible conflicts if you 
use it. 

As with the other two flags, you must set 
CDTMF3 when you set CDTMV3. Any non- 
zero value is okay. 



SRTIMR 

555 



022B 



Well, here in the middle of all the timer 
stuff is a different kind of timer. As every- 
body knows, if you hold down a key on the 
Atari, it will start repeating, right? And some- 
thing has to tell the OS how long to wait be- 
fore starting that repeat and before repeating 
it again, right? And can you guess what lo- 
cation does that? Sure, I knew you could. 
SRTIMR is set to 48 every time a key is 
pressed. Every Stage 2 VBLANK that the key 
is still held down, SRTIMR gets decrement- 
ed by one. When it reaches zero, the repeat 
process starts. It gets set to six, decrement- 
ed again, the key repeats, it gets reset to six, 
and so forth until the key is released. Unfor- 
tunately, there are no locations that store the 
two delay tunes, so you can't speed up or slow 
down the process just by changing a couple 
of locations. There is, however, another way 
to do it. 

As you recall, the initial delay time of 48 
is set whenever a key is pressed. As you may 
or may not recall, we came across a vector 
a few locations ago (VKEYBD [520,521]) that 
pointed to the IRQ routine for a key being 
pressed. It is in this routine that the delay is 
set. So in order to change the delay, you must 
essentially take the OS routine, change the 
delay value, store your revised version in 
memory and update the vector. You'll find the 
OS routine at location $FFBE on page 130 
of the OS listing. 

How about the other delay, the six jiffy 
one, once the repeat is started? If you were 
paying attention (and I know you were), you 
already know that it gets set in Stage 2 
VBLANK. Can you guess what you're go- 
ing to have to do to be able to set it yourself? 



If you guessed "take the OS Stage 2 
VBLANK interrupt routine and put it in my 
own deferred VBI routine with the delay 
value changed," then give yourself a pat on 
the back. 

"But wait! The OS Stage 2 VBI routine gets 
executed whether I have my own deferred 
VBI routine or not," you say, taking me com- 
pletely by surprise. You're right, though (or 
would have been if you had said it). Your 
deferred routine, however, happens after the 
OSs, so you can just repeat the part that sets 
the delay and, since you'll set it after the OS 
does, yours will be the one that counts. The 
part you want is at locations $E87C through 
$E897 on page 36 of the OS listing, and lo- 
cations $E8E8 through $E8EE on page 37 
(these locations will be different in the new 
OS, but that's irrelevant here). Be aware that 
the OS will now be executing this routine 
twice and will therefore be decrementing by 
two every VBLANK. You should set 
SRTIMR to double the delay you want, and 
also change your deferred routine so that it 
resets SRTIMR if it's equal to zero or one. 
That makes sure that the OS routine doesn't 
reset it before you get a chance to. 



CDTMF4 
556 



022C 



And now, back to our timers. This is the 
flag for CDTMV4 (542,543). See CDTMF3 
for more information. 



INTEMP 

557 



022D 



INTEMP is used for temporary storage 
during the SETVBL routine. As you recall, 
SETVBL is at the address stored in 58460. 
Heaven only knows what INTEMP is doing 
here in the middle of the system timers. 



CDTMF5 

558 



022E 



This is the flag for CDTMV5 (558,559). 
See CDTMF4 for more information (ha, ha). 
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by Lee S. Brilliant 

In the never-ending battle between 
AMIGA and ST partisans we hear 
rhetoric like: 
"Well, I've got 4,000 colors to 
choose from!" 

"Yeah, but how many can you put up at the 
same time?" 

"But I've got a blitter chip!" 

"So what, I will have one soon too (ha- 
ha!). Besides, my faster clock speed makes 
it unnecessary!" 

"Okay. Top this: I've got stereo sound!" 

Uh-oh. How do you respond to that one? 
You could mention the MIDI interface, but 
try this retort instead: "Atari gave up that one 
with the 8-bit machines because no one ever 
used the feature!" 

''Say whatl The old-fashioned, outdated, 
inferior, 8-bit Atari computers had four- 
channel stereo sound?" 

"Yes! In fact, they had three-channel 
sound!" 

"So, how come I never heard about it?" 

"Because until this article, no one ever 
knew about it!" 

So now you know the subject we will cover 
this month. Along the way we will rehash 
some old material about POKEY, cover some 
new stuff and build the POly Phonic Sound 
(POPS) device. So let's rehash! 

FOKEY revisited 

In the last three installments of "Bits 'n' 
Pieces," we spent a long time discussing 
how POKEY performs serial output. Sim- 
ply stated, POKEY contains a serial input 



and a serial output shift register whose 
baud rate is controlled by the sound fre- 
quency counters. This is similar in concept 
to a USART (Universal Synchronous/Asyn- 
chronous Receiver/Transmitter) . Such 
devices form the heart of all serial I/O and 
modem devices. Certain aspects of the 
POKEY control registers were only 
glossed over before, and so now is the time 
to go into slightly greater detail. Let's look 
at POKEY register number 15 or 
SKSTAT/SKCTL ($D20F,53775). (See 
Figure 1.) 

You see that bits 4, 5 and 6 control the 
USART parameters, determining what in- 
put and output modes will be used in vari- 
ous combinations of synchronous/ 
asynchronous I/O. It is not a very 
straightforward proposition here, but 
I will try to simplify it. The key to under- 
standing is to look to the clock lines on the 
serial bus. There are two: Clock Out (Pin 
2) and Clock In (Pin 1). 

Clock Out is relatively straightforward; 



whatever frequency is driving the Data-Out 
shift register is also present on the Clock- 
Out line. But the Clock-In line is bi- 
directional and may accept an external 
clock signal or act like Clock Out and 
transmit a POKEY-generated clock signal. 
This allows the input shift register or the 
output shift register to either accept an out- 
side clock signal or use an internal clock. 

Bits 4, 5 and 6 control the sources of 
clock pulses for both the In and Out shift 
registers and the directionality of the bi- 
directional clock, according to Figure 2. 
Since POKEY is the internal clock source, 
the frequencies generated by its dividers 
also appear on the clock lines. 

Atari chose to use only asynchronous 
communication and clock the shift registers 
internally. The OS ignores any external 
clocks and does not support synchronous 
I/O even though the hardware can. You can 
actually disconnect the clock lines in your 
serial cable and still use your 1050 disk- 
drive and printer. I cannot say whether all 
peripherals will work this way but these 
two will. See the diagrams in Figure 3 for 
examples of how POKEY can be con- 
figured for synchronous or asynchronous 
communications. 



BIT 
7 

6* 
5* 
4* 
3 
2 
1 




FUNCTION 
Forces Serial output to 
Serial port parameter selections 



Changes serial out from 1/0 logic to two-tone 
Changes from normal to fast POT scan 
Activates keyboard scanning 
Enables keyboard debounce circuits 



FIGURE 1: SKCTL 
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The important thing to learn from Figure nels 2 and 4 on separate clock lines through reasonable 0.5 volts. The 4066 IC is a bank 
2 is that when only bit 6 is set, POKEY separate amplifiers while playing 1 and 3 of electronic switches each of which is con- 
Channel 4 will appear on the Clock-Out together on the regular audio output line nected to a resistor, thus the higher the bi- 
line. Here is the potential for four-voice via the TV (or the audio output at the 5-pin nary code applied, the more resistors are 
sound in "stereo." Place an amplifier on plug). You need only set bits 5 and 6 of switched in and the more signal passes 
the Clock-Out line and "play" one voice SKCTL. This should make AMIGA fans through. The desired volume value is 
through the serial port and the others stand up and take notice. The following in- placed in PORTA, which is configured for 
through the TV in "stereo." Moreover, you formation will allow you to produce two- output through the joysticks and controls 
can have trinaural sound by playing Chan- or three-channel sound from your Atari, the volume of POPS left and center chan- 
nels. Right channel volume and distortion 
BIT BIDIRECT SERIN SEROUT are controlled as usual through AUDC 

CLOCK CLOCK CLOCK 

6 5 4 IN/OUT SOURCE SOURCE* FUNCTION registers. 

I have demonstrated this system to users' 

IN EXT EXT XMIT & RECV RATES SET groups and it really turns heads, even 

BY EXTERNAL SOURCE among people as jaded as Atari users. 

^ ^ Electronic volume control allows fade-outs 

_______ __ ________^ ______________________ ^^^^ _^jj ^^.^^^ ^^^ ^^^ ^.^^ ^.^^ ^^ ^^^^ 

RECV BY CH4 . interesting spatial sound effects. Listings 3 

ASYNC RECV, SYNC XMIT and 4 give simple demonstrations of the 

: abilities of POPS. I have included a 

10 CH4 CH4 CH4 XMIT & RECV SET BY schematic and circuit board for POPS: note 

°UT ?^':_^!!_°^_^^°^L'^_ part values, size and polarity of capacitors 

Oil IN CH4 CH4 XMIT & RECV SET BY ^""^ ^^ orientation. 

CH4 . ** Power is obtained from a nine- volt DC. 

500-milliamp wall supply like the one used 

10 IN EXT CH4 XMIT SET BY CH4 by Atari video games. They are available 

^^^^_^^_^^'^_?^°^!^ i" abundance. You may even have one of 

_______ _-^ _- CH4~~" XMIT & RECV SET BY these at home! Be sure to note the polarity 

CH4 . ** of the power plug: + at the tip and — at 
the sleeve. POPS is compatible with all 

110 CH4 CH4 CH2 RECV SET BY CH4 . XMIT 8-bit Atari computers, but the 400 does not 
^Ul' ^^'^ B^ '-'^2 • '-•^^ ^^'^ have an audio output line, so you can only 

°^J:^°^^_l^i_**_*_ play the right channel through your TV. 

111 IN CH4 CH2 RECV SET BY CH4 . XMIT Each channel of the amplifier puts out 

SET BY CH2. *** about half a watt, not enough to shatter 

glass but enough to get your wife upset! If 

you need more power you can get larger 

NOTES : amplifiers and power supplies from Radio 

EXT MEANS AN EXTERNAL CLOCK CONTROLS THESE SHIFT REGISTERS Shack. 

AND SETS THEIR BAUD RATES. 

16-BIT RESOLUTION CAN BE USED FOR FINE TUNING. 

* SAME SIGNAL ALWAYS APPEARS ON CLOCK OUT LINE. 

** LABLED AS NOT USEFUL BY HARDWARE MANUAL. 

*** TWO-TONE MODE CANNOT BE USED BECAUSE CHANNELS 1 & 2 ARE 

USED TO MAKE AUDIO TONES AND WILL CONFLICT. 



Schematic 



FIGURE 2: POKEY USART Parameters 



-> — CLOCK OUT 



DATA DATA 

l I i 

CLOCK la/OUT >SERIN--> SEROUT 

( EXT ) - I 



DATA DATA 

i I i 

SEHIN< >SEROUT 



DATA IN >- 



-DATA OUT 



FIGURE 3: Examples of USART 
configuration. 
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The POPS device 

The POly Phonic Sound (POPS) adap- 
ter is really nothing more than three sets 
of resistors to reduce, balance and control 
volume for the three audio amplifiers; the 
rest is done with programming. The two 
serial port amplifiers incorporate electronic 
volume controls that are regulated through 
the joystick ports (PORTA) similar to the 
POKEY control registers. 

Remember that these sound channels 
played on the clock lines are logic level sig- 
nals or five volts. This level of audio will 
blow away most amps so you need the 
resistors to drop the voltage to a more 



To produce stereo sound you must do the 
following things: 

1) Plug POPS into the serial bus and the 
audio output, and then connect the ampli- 
fiers to three speakers and turn on the pow- 
er. The right channel will come out the 
"normal" audio line so you can use your 
TV for one of the amplifiers on a 400. 

2) Set AUDCTL for the proper values for 
the kind of sound you want to produce (ie. , 
16-bit or different master clock). Try for 
starters (standard setting). 

3) Set the bits of SCKTL; 67 (3 + [bit 
6]64) for two-channel. Without the -1-3, the 
keyboard won't work, and you will need 
RESET to recover from POKE 53775 64. 

4) Set your AUDC and AUDF values for 
volume and distortion on all audio chan- 
nels. Keep in mind that the signals on the 
clock lines are taken off before the control 
circuits, so the audio control registers have 
no effect. You cannot control the noise con- 
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tent of the audio, but for most music this 
is just fine. The actual value poked into 
AUDC2/4 is not important, except you 
want the volume component to be 0, so you 
won't hear these channels play on the au- 
dio line or TV: A works great. You con- 
trol volume by poking the volume level 
(0-15) into PORTA. Remember that the 
value to POKE into 54016 is the left volume 
+16=tenter value. The channels which 
come out the normal audio line do use the 
AUDC registers and can be used with 
noises for percussion sounds or special ef- 
fects. You cannot use the BASIC SOUND 
statement because it resets the special 
values POKEd into AUDCTL. Build your 
POPS, connect it and try this simple 
program: 

1 REM PLAYS 2 POKEY CHANNELS IN STER 
EO THROUGH THE AUDIO CHANNEL (OR TV) 

AND SERIAL PORT PIN 2. 

2 P=PEEK(54018):P0KE 54018,P-4:P0KE 
540 16, 255: POKE 54018,P:REM INIT POR 
TA 

5 DELAY=100:P0KE 53761,174: POKE 53 

767,0:REM INITIALIZE AUDC1&4 

10 POKE 53768, 0:POKE 53775, 67:REM I 

NITIALIZE AUDCTL AND SKCTL FOR STER 

EO 

20 POKE 53760, 60: REM PLAY A NOTE ON 

R CHANNEL 

25 GOSUB DELAY :POKE 53760. 0:REM TUR 
N OFF 

30 POKE 53766,91 :PLAY A NOTE ON L C 
HANNEL 

35 GOSUB DELAY:POKE 53766,0 
40 POKE 53760, 72: POKE 53766, 121: REM 

STEREO I 

50 GOSUB DELAY :GOSUB DELAY :END 
100 FOR S=l TO 300:NEXT S:RETURN 

When you POKE SKCTL with 67, you 
get Voice 4 from the left channel and 1, 2 
and 3 from the right. You can combine 
values for 16-bit resolution with half on 
right and three-quarters on left. If you fol- 
low the same steps for two-channel sound, 
except you POKE SKCTL with 99 ([Bits 
5 +6=96] +3), you will get three-channel 
sound. Now Voice 2 will play through the 
left channel. Voice 4 through the center 
channel and Voices 1 and 3 on the right 
channel. You can combine 3 and 4 to good 
advantage here. Figure 4 is a block diagram 
of POKEY configuration with both two- and 
three-channel modes. 

Putting it all together 

To use the POPS device you need a good 
player program. I will make no bones about 
it, my programs are only modifications to 



CH 1&2- 



DATA 



.> AUDIO RIGHT 

CH 3 



CH 4 



DATA 



CLOCK IN/OUT >SERIN 



DATA IN- 



V V AUDIO LEFT 
SEROUT< >CLOCK OUT 



--DATA OUT 



STEREO 



CH 3 
CH 4 

V 



DATA 



AUDIO CENTER | | 
CLOCK IN/OUT >SERIN 



CH 1 > AUDIO RIGHT 

CH 2 

DATA 

V I AUDIO LEFT 
SEROUT< CLOCK OUT 



DATA IN > 

CHANNEL MODE 

FIGURE 4: POKEY Multi-mode. 



-> DATA OUT 



Enhanced POKEY Player. I chose to modi- 
fy this program because the player is in 
BASIC and machine language; so I could 
easily disassemble it and modify it. (Why 
reinvent the wheel?) Enhanced POKEY 
Player has been around a long time and was 
obtainable in the past from the ANTIC 
catalog (AP 0147), but has not been listed 
lately. You may have to ask for it specially. 
The following programs are published with 
the author's permission. 

After you obtain your Enhanced POKEY 
Player, make a duplicate to work from and 
put the original away. Never use the origi- 
nal disk with POPS! You will also need a 
separate work disk. Listing 1 is the main 
program and consists of a BASIC routine 
to load the music files and display tides. 
Then there is the Player itself, which is 
contained in a large string array, PP$, and 
some fixed locations in page 6. One sec- 
tion of the player string is essentially blank 
which allows us to insert our different rou- 



tines for mono, stereo or trinaural sound 
generation (CH1$, CH2 and CH3$). 

Listing 2 creates these complex strings. 
Type in and save both Listings 1 and 2 on 
the separate work disk, and then run List- 
ing 2 and save as LIST "D.TEMP," 
2000,2300. Load back Listing 1 and 
ENTER "D:TEMP." Now resave to your 
working POKEY Player disk as "D:PLAY- 
ER." This new program replaces the origi- 
nal Player and will list all available music 
files and flag them as three-channel (*), 
two-channel (-I-) or one-channel. Music 
files on the original POKEY Player disk 
are all labeled *.V, but this new program 
requires files with extenders .VIC, .V2C, 
or .V3C to denote one-, two- or three- 
channel music files. You will need to work 
through DOS to change the extenders ac- 
cording to Table 1. The player is now able 
to tell which mode to use and automatical- 
ly adjust itself according to the filename 
extenders. 
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PSONA .V2C 


MINUET2 .V2C 


SLP3 


.V3C 




ANVIL .VIC 


GLAD .V2C 


MUSETTE 


.V2C 




SLP4 .V3C 


BC5 .V2C 


GMARCH 


.V2C 




NELLIE .VIC 


SLP5 .V3C 


BLUES 


. V2C 




GOLDVI .V2C 


PRELUDE .V3C 


SLP6 


.V2C 




BMINOH .V3C 


GOTHOS .V3C 


PRESTO 


. V2C 




SOLDIER .V3C 


CALLIOPE. V2C 


GSONA 


. V2C 




RIGAUD0N.V3C 


SWISS .V3C 


CANTATA 


.V3C 




HBDAY .V2C 


SABRE .V2C 


THEMEVAR 


.V3C 




CAPRICI0.V3C 


HOLST .VIC 


SCAR 


.V3C 




TPIAM .V2C 


CLAV .V3C 


HUMORESK 


.V3C 




SCHERZAD.V3C 


TPIBF .V2C 


COURANTE 


.V2C 




ITALIAN .V2C 


SCIPIO .V3C 


TPIF 


V2C 




CSONATA .V3C 


LITTLE .V3C 


SLPl 


V3C 




WILLTELL.V3C 


DMARCH .V2C 


LONDON 


V3C 




SLP2 .V3C 


WS0LDIER.V2C 


FEAST 


V3C 




MINUET! .VIC 










TABLE 1: Extender List 




SERIAL 










PIN 2 


Notes about Enhanced 
POKEY Player 




1 



Writing music with the POKEY Player 
editor requires a couple of notes. POKEY 
Player has only three voices, naturally la- 
beled 1, 2 and 3. POKEY Player Voice 1 
uses POKEY chip's Voice I and will be the 
right channel in POPS. POKEY Player 
Voice 2 similarly is POKEY Voice 2 and 
is the left channel in three-channel mode, 
but in stereo it will come out the right chan- 
nel along with Voice 1. POKEY Player 
Voice 3 is POKEY Voices 3 and 4 com- 
bined in 16-bit fashion and comes out from 
the center channel in three-channel mode 
and the left side in stereo. 

Only voices from the right channel use 
the distortion abilities of POKEY, so you 
can always use Voice 1 for percussion or 
special effects, but in stereo you can also 
use Voice 2. Voice 3 (3/4) usually carries 
the melody line because it has the widest 
range of note values and can also be used 
for really deep bass lines. Not all features 
of the POKEY Player editor can be used 
by POPS, and for some reason some three- 
voice music will not play properly on 
POPS' three-channel mode, but will do 
okay in stereo. Some two-voice programs 
can only be played in mono. The list of files 
on Enhanced POKEY Player are in Table 
1 with their proper extenders. 

Parts list 

The 13-pin Atari Serial Plug (#83-360) 
is available from MCM Electronics, 2582 
East River Road, Moraine, Ohio 45439; 
(800) 858-4330. The resistors, volume con- 
trols, capacitors, joystick cables and am- 
plifiers are available at Radio Shack. Not 
all resistor values are available at Radio 
Shack, however. You may need to combine 
resistors such as 220K plus 470K to ap- 
proximate 800K. Actual values are com- 
pletely non-critical. The RCA phono jacks, 
speakers and cables are also available at 
Radio Shack. The 4066 ICs may be or- 
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.Ipf 



R2 

R3 



n. 



1 1C1 
820K 

: 406« 
390K ^^ ; 

200K ^ 



^ 



JOYSTICKS 



<^ 



.luf 



SERIALc 
PIN 1 




: IC1 
820K ^ 

2-VWWW^^- 

; 4066 
390K ^ I 

,. 200K i 



CENTER 




dered specially through Radio Shack. Ask the power supply is Radio Shack's 
them to special order SK4066B. Finally, # 273-1455. 
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Joystick B 











Serial/ 




1 i£cr itS!.s-^»--y' 






:bii 



Audio' 
gnd- 







Left 



■44— Center 



Right 



Lfst/ng 7: 



51 10 REM POKEY PLAYER BY CROIG CHftMBERLA 

IN. MODIFIED BY LEE BRILLIANT M.D. 
MF 30 GOSUB 1600 
FX 100 IF PEEKC764)<>255 THEN POKE 764,25 

SiPOKE 1536,0 
KL 110 IF PEEKC1536J=1 THEM 100 
IW 120 U=USRtPP+156) :G05UB 1090:G0T0 100 
HS 1000 GOSUB 2000:P0KE 675,0:POKE 676,1: 

POKE 677,0:P0KE 678,8:P0KE 679,0:POKE 

65,0 
HQ 1010 RESTORE 2300 : FOR N=1606 TO 1648 !R 

EAD DiPOKE N,D!NEXT N : REM NON-RELOCATB 

LE CODE 
CM 1020 POKE 752,l:TRAP 1900:? "IV MULT 

I CHANNEL MUSIC PLAYER ":OPEM «1,6, 

O,"D:».U?C":K=0 
TF 1030 INPUT «i,R$:IF R$C2,2J<>" ■■ THEN 

1070 

YS 1040 ? R${3,10);:IF RSC12,12J='"3" THEN 
? ■■»■■; 

KH 1050 IF RSC12,12)="2" THEN ? ■■ + ■'; 
MS 1060 ? CHR$tl27) ; :K=K+l:GOTO 1030 
OJ 1070 CLOSE ttllPOKE 703,4:P0KE 752,0:? 

KG 1080 IF K=e THEN ? "NO MUSIC FILES ON 
THIS DI5K":F0R DE=1 TO 500:NEKT DE 

TF 1090 TRAP 1950:? "HYOUR REQUEST"; : INPU 
T R$:IF RS="" then poke 703,24:G0T0 10 
20 

cu 1100 fS="D:":fSc3J=rS:fSclencfS}+ij="» 

.U?C":0PEN »1,6.0,F$ 
PF 1110 INPUT «1,RS:IF R$C12,12J="1" THEN 

PPSC181,254J=CH1$ 
YD 1120 IF R$C12,12)="2" THEN PPSC181,254 

SB 




y^^!^^ 




c I9t7 



TF 



SUPER POPS 
rllliant 
Softwora 



BITS 'N' 

PIECES: 

POPS 

)=CH2S 
AR 1130 IF RSC12,12J="3" THEM PPStl81,254 

)=CH3$ 
S5 1140 CLOSE «l:OPEN «1, 4, 0, F$ : A=BUFF 
FG 1150 FOR K=0 TO 2:GET «1,L0:GET ai,HI: 

L=L0+256»HI 
WY 1160 U=USRCCIO,A,LJ :IF U>127 THEN POKE 

195,U:CL0SE «l:GOTO 1910 
TG 1170 U=USRtPP+94,K,A> :A=A+L:MEKT K 
BJ 1180 FOR N=1601 TO 1604:POKE N,0:NEXT 

N:? "H"; 
IZ 1190 TRAP 1200:INPUT ttl,R$:? :? R$::GO 

TO 1190 
WT 1200 IF PEEKtl95J<>136 THEN 1950 
TK 1210 TRAP 1950: CLOSE ttl 
CZ 1220 U=USRCPP,PP+180,PP+267,PP+473,PP+ 

819,PP+625) :POKE 1536,1 
AM 1230 RETURN 
CJ 1900 IF PEEKC195J=170 THEN ? "I DON'T 

KNOW THAT SONG.":CLOSE ttl : GOTO 1690 
QH 1950 ? "HERROR "; PEEK C195J : A=USR IPP+15 

6} 
NN 1999 CLR : END 
QP 2000 DIM PPSC892) ,CH1$(74) ,CH2$(74),CH 

3S (74) , CIO$ C34) , R5 C40) , F$ f 16) , BUFF$ CFR 

EC0)-500) 
NS 2005 PP=ADRCPP$) :BUFF=ADRCBUFFS) ;CIO=A 

DR(CIO$) 
05 2240 PP$C876,876)=CHR$C155) :RETURN 
MI 2300 DATA 12,24,36,48,244,232,220,208, 

1,2,3,4,5,6,7,0,255,254,253,252,251,25 

0,249,108,2,6,108,4,6,108,6,6,160,0 
GE 2310 DATA 177,203,230,203,208,2,230,20 

4,96 
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Listing 2: 
BASIC 



BR 90 OPEN «i,4,e,"K:" 

PZ 180 ? "H":LINE=2eO0:FOH N=l TO 948:REa 

D D 
DU 110 IF D<0 THEN G05UB 400!? "H" ! LINE=L 

INE+10!PO5ITION 2,3!? LINE;" PP$C"jCftB 

S CD) };■■}=■■; CHR$C34} J : READ D 
XL 120 ? CHR$CI»;!NEXT N:G05UB 400 
UT 130 RESTORE 900!? CHR$ (125) : POSITION 2 

,3!? "2200 CH1$=";CHRSC34) J !FOR N=l TO 

74:READ D!? CHR$ CDl ; ! NEXT N:GOSUB 400 

ID 140 ? CHRSC125) :P05ITI0N 2,3:? "2210 C 

H2$=";CHR$t34) J !F0R N=l TO 75 ! READ D:? 
CHR$(D]; !NEXT N!GOSUB 400 
LC 150 ? CHR$C125) IPOSITION 2,3!? "2220 

H3$ = ",-CHR$C34); IFOR N = l TO 75:RE6D D 
CHR$CD} ; !NEXT N:GOSUB 400 
FG 160 ? CHR$ £125) ! POSITION 2,3:? "2230 

I0$=";CHR$C34) J !FOR N=l TO 39!READ D 
CHRSCD) j :NEXT N!GOS UB 400 
ZZ 170 ? "ISPRES5 l:U<ll!i:i TO!"!? "LIST ■D:T 

EMP' ,2000,2300" 
NO 180 GET «1,K!IF K0155 THEN 180 
EX 190 LIST "D!TEMP",20O0,230O!END 
NY 400 ? !? :? "CONT":POSITION 2,0:P0KE 8 

42,13:ST0P 
SH 410 POKE 842,12:RETURN 
BR 500 DATA -1,104,104,141,3,6,104,141,2, 

6,104,141,5,6,104,141,4,6,104,141,7,6, 

104,141,6,6,104 
KS 510 DATA 141,14,6,104,141,10,6,104,141 

,15,6,104,141,11,6,169,0,141,0,6,141,1 

,6,141,54,6 
XU 520 DATA 169,144,162,5,27,157,54,6,74, 

202,208,249,169,12,141,60,6,169,40,141 

,69,6,173,36,2,141,8 
AJ 530 DATA 6,173,37,2,141,9,6,169,7,162, 

6,160,-91,93,76,92,228,104,104,104,170 

,104,27,157,21,6,27,157,27,27 
CN 540 DATA 6,104,27,157,18,6,27,157,24,6 

,169,0,27,157,39,6,27,157,42,6,27,157, 

51,6,168,169,1,27,157,33,6,169 
5K 550 DATA 36,224,2,208,3,169,48,200,27, 

157,36,6,152,27,157,27,30,6,169,166,27 

,157,45,6,169,7,27,157,48,6,96 
UX 560 DATA 104,169,7,174,9,6,172,8,6,32, 

92,228,169,0,162,7,27,157,0,210,234,20 

2,16,249,96,-181,0 
JH 570 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

,0,0,0,0,0,0,0,0,0,0,0 
JJ 580 DATA 0,0, 0,0, 0,0, 0,0,0, 0,0, 0,0,0,0 

,0,0,0,0,0,0,0,0,0,0,0 
IF 590 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

,0,0,0,0,0,0,162,0,32,96,6,232 
MO 600 DATA 224,3,208,248,108,8,6,189,18, 

6,-271,133,203,189,21,6,133,204,222,33 

,6,240,27,27,189,42,6,208 
5F 610 DATA 18,189,33,6,221,48,6,176,10,1 

89,65,6,41,15,240,3,222,65,6,96,32,99, 

6,32,102,6 
10 620 DATA 133,207,41,248,201,128,208,18 

,165,207,41,7,168,185,70,6,24,27,125,3 

6,6,27,157,36,6,24,144,227 
LP 630 DATA 165,207,41,7,240,218,168,136, 

185,54,6,27,157,33,6,188,27,30,6,185,1 

0,6,133,205,185,-362,14,6,133 
PK 640 DATA 206,165,207,74,74,74,41,15,20 

8,10,27,157,65,6,169,1,27,157,42,6,208 

,78,168,136,185,78,6,24 
DC 650 DATA 27,125,36,6,27,157,36,6,168,1 

89,45,6,27,157,65,6,177,205,24,27,125, 

39,6,27,157,61,6,224,2,208,13 
00 660 DATA 152,24,105,97,168,177,205,141 

,64,6,24,144,26,189,45,6,41,240,201,16 

0,208,17,189,36,6,201 
KG 670 DATA 50,144,10,189,45,6,41,15,9,-4 

52,192,27,157,65,6,165,207,41,128,27,1 

57,42,6,165,203,27,157,18,6,165 
LB 680 DATA 204,27,157,21,6,96,160,0,165, 

207,41,120,208,21,189,51,6,240,5,222,5 

1,6,240,10,189,24,6 
GD 690 DATA 133,203,189,27,27,6,133,284,9 

6,201,8,208,13,32,102,6,27,157,45,6,32 

,102,6,27,157,48,6,96,201 
GD 700 DATA 16,208,17,32,102,6,27,157,51, 

6,165,203,27,157,24,6,165,204,27,157,2 

7,27,6,96,201,24,208,-544,7,32,162 
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HX 710 DATA 6,27,157,39,6,96,201,32,208,2 

2,160,6,177,203,153,54,6,136,16,248,15 

9,7,24,101,203,133,203 
DD 720 DATA 144,2,230,204,96,201,40,208,7 

,32,102,6,141,1,6,96,201,48,208,7,32,1 

02,6,141,69,6 
MH 730 DATA 96,201,56,208,7,32,102,6,27,1 

57,27,30,6,96,201,64,288,7,32,102,6,27 

,157,36,6,96,140,0,6 
AQ 740 DATA 96,209,223,237,251,9,27,30,44 

,65,-634,79,100,121,149,165,189,217,24 

5,17,59,87,129,27,157,199,241,41,75 
JF 750 DATA 121,177,233,33,117,173,1,57,1 

41,225,81,165,21,133,245,101,241,97,9, 

149,61,229,141,81,21,245 
NC 760 DATA 213,209,205,1,27,253,49,101,2 

09,61,165,42,234,170,152,154,2,250,98, 

202,162,122,75,84,212,84,68 
IQ 770 DATA 52,4,244,196,148,68,244,158,1 

68,168,168,136,104,8,232,136,40,136,23 

2,72,0,-724,0,0,0,1,1 
XF 780 DATA 1,1,1,1,1,1,1,1,1,1,2,2,2,2,2 

,2,2,3,3,3,3,3,4,4,4,5 
RL 790 DATA 5,5,5,6,6,7,7,7,8,8,9,10,10,1 

1,11,12,13,14,14,15,16,17,19,19,21,22 
JR 800 DATA 23,25,26,27,28,27,29,27,31,33 

,35,38,39,42,44,47,50,53,56,59,63,67,7 

1,76,79,84,89,95,100 
UC 810 DATA 106,112,119,27,126,134,142,15 

2,-814,27,159,169,179,190,201,213,1,3, 

6,9,12,15,18,22,23,25,26,27,28,27,29 
SD 820 DATA 27,31,33,35,37,40,42,45,47,50 

,53,57,60,64,68,72,76,81,85,91,96,102, 

108,114,121,128,136 
OC 830 DATA 144,153,162,173,182,193,204,2 

17,230,243,27,255,110,116,122,131,137, 

146,27,0,167,173,185,197,206,221,233 
BM 840 DATA 245,87,91,97,102,108,115,121, 

130 
FE 900 DATA 234,234,234,234,234,234,173,0 

,6,240,73,216,169,3,141,50,2,141,15,21 

0,173,61,6,141,0 
HH 910 DATA 210,173,65,6,141,1,210,173,62 

,6,141,2,210,173,66,6,141,3,210,173,63 

,6,141,4,210 
AC 920 DATA 173,67,6,141,7,210,173,64,6,1 

41,6,210,173,68,6,141,5,210,173,69,6,1 

41,8,210 
UK 930 DATA 234,234,234,234,234,234,234,2 

34,234,234,234,234,234,234,173,0,6,240 

,65,216,169,67,141,15,210 
NG 940 DATA 162,6,160,3,185,61,6,27,157,0 

,210,202,202,136,16,245,173,65,6,141,1 

,210,173,66,6,141 
MU 950 DATA 3,210,173,67,6,41,15,141,0,21 

1,169,0,141,5,210,141,7,210,173,69,6,1 

41,8,210 
UB 960 DATA 234,234,234,234,234,234,173,0 

,6,240,73,216,169,99,141,15,210,162,6, 

160,3,185,61,6,27,157 
G5 970 DATA 0,210,202,202,136,16,245,173, 

65,6,141,1,210,173,66,6,41,15,133,0,17 

3,67,6,10,10 
PA 980 DATA 10,10,5,0,141,0,211,169,0,141 

,3,210,141,5,210,141,7,210,173,69,6,14 

1 R 7 1 f) 
MX 990'dATA 104,162,16,169,7,27,157,66,3, 

104,27,157,69,3,104,27,157,68,3,104,27 

,157,73,3,104,27,157,72 
PK 1000 DATA 3,32,86,228,132,212,169,0,13 

3,213,96 



Listing 3: 
BASiC 



5 GOSU 
GJ 30 FOR 

;POKE 
ZP 99 END 
RU 100 DA 

7,160, 

,160,1 
HJ 110 DA 

60,246 

,160,2 
TJ 120 DA 

67,128 



B 300 

S=0 TO 8l!READ A,B:POKE 54016, A 
53761, B!NEXT S 



TA 15,160,15,160,15,160,31,160,4 
63,160,79,160,95,160,111,160,127 
42,160,157,160,172,160,187,160 
TA 202,160,217,160,232,160,247,1 
,160,245,160,244,160,243,160,242 
41,160,240,161,224,162,208,163 
TA 192,164,176,165,160,166,144,1 
,168,112,169,96,170,80,171,64,17 

sa 



80 COL. SCREENI-NEW PRICES! 



Turbobase. *=nj^ 

"IBM power without the price ... I really can't think of any feature associated with running 
a business that has been left out-except for the huge prices charged for comparable 
software on MS-DOS computers." -ANTIC, Dec. '87 

"... the most time consuming review I have ever done, due to the number of features . . . 
Turbobase finally gives what 8-bit owners have been clamoring for for years; true, power- 
ful business software ... set up a fully capable business system for less than $1 ,000 . . . 
customer support is superb . . . Practicality-excellent. Documentation-excellent." 

-COMPUTER SHOPPER, Aug. '87 
"... one of the most powerful and versatile database programs available ..." 

-COMPUTER SHOPPER, Aug. '88 



COMPARE TO IBM CLONES 

• Capability • Complete Documentation 

• Capacity • $20-$50 Customizations 

• Remote Terminals • One package/all modules 

• Exhaustive Support • All Hardware Upgrades 

• No Disk Switching • Brand Name Hardware 

• Tiny Footprint • Tme Integration 

• Not Copy Protected • Free Application Set-up 

Tufbobase takes S20.000 video store sale from IBM . . S.V, Pla/nfield, NJ 
Turbobase takes 520.000 IBM sale for waterbetl store. .AJ.. Phoenix. AZ 
Turbobase replaces 537,000 air conditioning application, ,,A.B., Alton. NH 
Until yoLj have Turbobase you don't have a daiabasel. ..Acorn Users Group 



• Speed among thousands of records 

• Ease of learning (per feature) 

• Number of English error messages 

• Adaptability to Existing Application 

• Hardware/DOS easier than Clone/MS DOS "* 

• Faster Back-up to inexpensive floppy 

• Complete Invoice/Payments Error Checking 



Micromiser is looking for resellers. If you have 2 DD drives, or an MIO '" , or hard disk, You qual- 
ify for free training, dealer prices, marketing/direct mail help, and myriad customer references 
who express extreme satisfaction vwith Turbobase. Compare tfie Turbobase '" /fvllO '" configu- 
ration at $830 (all hardware & software except printer) with the IBM AT'" : Immediate RAM 
access to 6,000 invoices, or 1 5,000 inventory items, or 50,000 G/L records, or 20,000 payroll 
records, or any combination of above! W\ib a hard drive (add only $100) the figures go up! 
4,000 addresses too! An unbeatable selling point: replace any component for the cost of a 
typical IBfvl'" /Apple'" repair bill! The smaNbusiness market is yours! Just ask, "Is IBM'" 
compatibility worth $20,000 to you?" 



TURBOBASE'" — the a// /none database/business system: 3 databases + word processor 
includes file manager/spread sheet/relational features/accounting/report generator, G/L, 
P/S, AR, AP, open invoicing/statements, inventory, payroll, mailing, utilities, all truly integrated 
in one program/manual so simplified that we can present complete detailed instructions in 
only 700+ pages of superb documentation (third re-write) includes separate Quick Course 
and Cookbook + 8 disk sides. Runs on any 46K 6-bit Atari, only 1 drive req. Call today! 



Turbobase S 1 59-Tufbo Jr S99 
ForXEP— 80 col. screen: 

Turbobase 80 S 1 79— Jr 80 $ II 9 w/80 
col word processoradd S24 80 col word 
processoralone S49 



STownerslAskabout Ultrabase ST (B/W mon- 
itor only) all Turbobase features + much more 
4- Ultimate SIMPLICITY ^nd speed 

(407) 857-6014 



MICROMISER SOFTWARE, 1635-A HOLDEN AVE., ORLANDO, FL 32809 



CIRCLE #105 ON READER SERVICE CARD. 



2, 48, i73, 32, 174, 16, 175, 8,175, 0,175 

flZ 130 DATft 0,175,9,175,16,175,32,174,48, 
173,64,172,80,171,96,170,112,169,128,1 
68,144,167,160,166,176,165,192,164 

RP 140 DATft 208,163,224,162,240,161,241,1 
60,242,160,243,160,244,160,245,160,245 
,160,247,160,232,160,217,160,202,160 

TN 150 DATA 187,160,172,160,157,160,142,1 
60,127,160,111,160,95,160,79,160,63,16 
0,47,160,31,160,15,160,15,160,15,160 

FR 300 P=PEEKt54018J :P0KE 54018, P-4 : POKE 
54016, 255:P0KE 54018, P 

KD 310 SOUND 0, 200, lO, : SOUND 1,200,10,0: 
SOUND 3,200,10,0 

GZ 320 POKE 53775, 99:RETURM 



Listing 4: 
BASIC 



OM 5 GOSUB 300 

FJ 10 PITCH=INTtRMDCO)«10OJ+15:CH=IHTCRND 

t0)»3)+l 
FE 20 ON CH GOSUB 100, 128, 140 : FOR DE=1 TO 

50:NEXT DEIPOKE 54016, OrPOKE 53761,0 
SM 30 FOR DE=1 TO 50:NEXT DEIGOTO lO 
JL 100 POKE 53760, PITCHlPOKE 53761, 174:RE 

TURN 
YG 120 POKE 53766, PITCH:POKE 54016, 240:RE 

TURN 
OZ 140 POKE 53762, PITCH:POKE 54016, 15:RET 

URN 
FW 300 P=PEEKt54018) :P0KE 54018, P-4 ! POKE 

54016, 255:P0KE 54018, PrREM JOYSTICKS F 

OR OUTPUT 
UJ 310 POKE 53775, 99:P0KE 53768, : RETURN 



No Frills Software 800 E. 23rd St. Kearney, Ne. 68847 008)234 6250 ^n'^f 



THE CONVERTER 

It's Herel Only $19.g5(+$2 shipping) 
8- bit 

Now you can convert your PrintShop 

icons to Awardware, Printpower or 

Newsroom format. The Converter also 

converts Awardware seals to graphics or 

vice versa or to Printpower or Newsroom 

form. It also has a graphics editor to 

allow touchup of the icons or to make 

your own icons from scratch. 

Also available at $19.95(+ shipping) 

P.S. Users Utility Disk 

Almost a dozen features! A icon viewer 

for your PrintShop icons, an icon 

cataloger, border cataloger, font 

cataloger, a transfer program for moving 

icons from disk to disk, a multi-size label 

maker(includes sizes for video 

tapes-inside & spine), a txjokmark 

maker, envelope cachet maker, coupon 

maker & more. Currently supports 

Epson & fully Epson compatible printers, 

send SASE for details & all printers 

supported). $2 shipping covers both 

programs. PrintShop is a trademark of 

Brodertxind Software, Awardware & Printpower 

trademarks of Hi-Tech Expressions, Newsroom is a 

trademark of Springboard Software, not affiliated 

with f^ FRILLS SOFTWARE. 



For 8bit PrintShop and 
Printmaster (ST) 

Nearly 6000 icons, fonts & borders from 
$2 to $23 a disk(group specials availE^le) 

Fonts & Baders 1-4 now $14.95. 

Christian Scenes & Symbols 1 or 2 $19.95 each. 

DavkaGraphics 1,2,3(Hebfew icons/fonts) $23 each. 

PS GRAPHICS 1 to 7 now $9.95 each. 

JACS PS Graphics 1 to 4 $995 e«;h (the ONLY 

authorized source for the JACS dsks). 

Budget Graphics 1 to 16 now $4.95 each 

Budget Graphics 17-24 $2 each 

NERDS MAP disk set $15 or $9 each 

NERDS Biology set $15 a $9 each 

NERDS Chem(periodic table) disk $9 

GOAT OF ARMS Const. Set now $13 

NEWI Beagle Bros. MINIPIX disks 1,2,3 (200 icons 

per disk) $19.95 exh. $49/95 for all 3. 

NEWI Fonts & Borders 5 and 6 $1495 each (#6 ready 

late November). Each font disk has more than 15 

fonts and many b)Ofders(#3 has fewest borders). 



Add $1.50 shipping for first PS/PM dsk ofdered, add 

$.50 eacfi additional disk to max of $5.(US shipping) 

Add $1 additional to Canada/Mexk;o, $4 other 

countries. Prices on Ps/Pm disks good thru 1988. 

Add 4% VISA/MC. checks-2 week clearance/ Prices 

above fa 8-bit disks. ST disks add $1 per title. All 

disks not available for ST. Call or write (SASE $.45 

postage) for details/pfintouts. Discounts available tor 

large orders (call/write), ST Icon disks available in 

package groups (cali/write) 

Printmaster Is a trademark of Unison World not 

affiliated with NO FRILLS SOFTWARE. 

ST icon disks (indvidual disks only, not package 

disks) also contain DEGAS formats of icons 



We also carry a variety of 
other ATARI hard/software. 

Send SASE for list (only 1 SASE 

needed for all areas here, please 

specify areas of Interest- PS, pgms.etc). 



-8bit- 



ACE OF ACES- J9.25 BRIDGE 4 0- $14.99 

BRIDGE 5.0-$17.99 C0MPUBRIDGE-$14 99 
LrNKW0RD(llalFrGnch.Germaa9xjnlsh) $14.99 eo 
Strip Poker-$17.99 DATA DISKS 1,2,3 tii99 ea 

FEGGAMON-$9.25 GUDERIAN- $17 99 

GULF STRIKE- $17.99 SPITFIRE ■40-120 99 

BLAZING PADDLES- J20.99 TYCOON- $11.99 

Video Vegas or Rainy Day Games- $17 99ea 

221 Balier St-»t7 99 221 Baker case disk SI099 

Alt.Reallty(Dunaeonv«26 7 5 ah Really(cily^ti8 75 

BlSMAHK-t19.99 VIDEO TITLE SHOPS 19 99 

TOMAHAWK-tig,99 O-ESSMASTER 2000*25 79 

EPYX 500XJ Joysllck-tI1.97 Spy vs Spy 3 t11.97 

FrinlR)W9r-t9,g9 Astro Grover-£649 

Sesame SI, R-til Klt-t9.49 Celeb Cooktx)ok-t20 99 

Gaunt lei -t 20 99 MIO BOARD 1 MEG-t254 99 

I*WSR00M-J29,g9 TRAILBLAZER-$17 99 

ST lilies 

Rrtxill Wzard-20.99 221 Baker SI t26 76 

DEGAS ELITE-«38.99 MARK WILLIAMS X' «119 99 
WORD PERFECT- 1 195 MONITOR MASTER-t^l 95 
HJNT For Red Oclober-t3195 0103-12199 
SUNDOG (24 99 IB 40 Track drive tl89 99 

SHIPPING: add $2 first title ordered, add 

$1 each added title. Hardware-call for 

shipping. Add 4% VISA/MC Coll for delails 

on credit card guarentee ordering Rices 

of oulside son wore subjecl lo cfionoe 



CIRCLE #106 ON READER SERVICE CARD. 
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Attention 
Programmers! 



ANALOG Computing is interested in programs, articles, and software review sub- 
missions dealing with the Atari home computers. If you feel that you can write as well 
as you can program, then submit those articles and reviews that have been floating 
around in your head, awaiting publication. This is your opportunity to share your knowl- 
edge with the growing family of Atari computer owners. 

All submissions for publication, both program listings and text, should be provided 
in printed and magnetic form. Typed or printed copy of text is mandatory and should 
be in upper and lower case with double spacing. By submitting articles to ANALOG 
Computing, authors acknowledge that such materials, upon acceptance for publica- 
tion, become the exclusive property of ANALOG Computing. If not accepted for pub- 
lication, the articles and/or programs will remain the property of the author If submissions 
are to be returned, please supply a self-addressed, stamped envelope. All submissions 
of any kind must be accompanied by the author's full address and telephone number 



Send your programs and articles to: 

ANALOG Computing 

P.O. Box 1413-M.O. 

Manchester, CT 06040-1413 




I 
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3 in 1 Football 

Lance Haffner Games 
P.O. Box 100594 
Nashville, TN 37210 
(615) 242-2617 
48K disk 
$39.95 

reviewed by Dave Arllnglon 

What with the player's strike early in the 
1987 season, I once again began my long 
quest last fall to find a decent football game 
for my Atari computer. I was not looking 
for an arcade-type football game like 
Touchdown Football or Gamestar Football. 
I was looking for a strategic football game 
that would allow me to coach real NFL 
football teams and their players like 
Microleague Baseball lets me manage real 
baseball players. Unfortunately, up until 
late last year, there were no such football 
games for the Atari. 

There were some attempts before this 
year. Gridiron Glory, late of APX and now 
from Main ST. Software, was the first to 
allow you to use real football teams. I'm 
not sure exactly what statistics they used, 
but the game was very unrealistic as the 
quarters were only eight minutes long and 
the computer coach called plays random- 
ly. Next was Football Strategy from Ava- 
lon Hill. That game featured 16 historical 
NFL teams, mostly Super Bowl par- 
ticipants. Again the team values used were 
hard to judge and did not feature individu- 
al players. They also didn't seem to have 
too much effect on game play, as it was 
usually easy for me to beat the computer, 
with me taking teams like the (9-7) N.Y. Gi- 
ants and giving the computer teams like 
the (14-0) Miami Dolphins. 

The most recent attempt is Computer 
Quarterback from SSI. It is sold as a strate- 
gy football game using generic football 
teams. In this respect, it is the best foot- 




ball game available for Atari, since on 
offense you can choose from 36 different 
types of plays and 20 -t- different types of 
defenses. The computer coach can also 
learn to play better against you if you call 
the same types of plays over and over again. 
Computer Quarterback also includes a 
draft feature where general managers are 
given a certain amount of money to spend 
on a team to improve certain player posi- 
tions. However, neither option uses real 
NFL teams or players. SSI began to make 
available seasons disks with the NFL teams 



for an entire year. Currently 1984, 1985 and 
1986 seasons disks are available. Again, 
however, teams are rated abstractly by po- 
sition and individual players are not 
available. 

Which brings us to the star of this 
review: 3 in 1 Football from Lance Haff- 
ner Games. This statistical-based football 
game allows you to play with college, NFL, 
USFL and WFL football teams with the 
rules for college; NFL and USFL being 
available to play under. Teams are rated in 
many offensive and defensive categories in- 
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eluding the types of plays usually called by 
the teams. Individual players are rated at 
the following positions: quarterback, run- 
ning back (both running and receiving), 
receivers, kickers, punters and return 
specialists. Everyone else is rated on a team 
basis. 

Let's talk about the bad parts of the game 
first to get them out of the way. The game 
is written in BASIC, as it was translated 
from many other computers. Therefore, it 
can be very slow at times when loading the 
game or the data for the teams. The actual 



game itself is very fast. There are absolute- 
ly no graphics in this game, so anyone ex- 
pecting a fancy display should be 
forewarned. It is simple Graphics text, 
white on a black background. I can under- 
stand this as the graphics were foresaken 
to use as much memory as possible for the 
many options this game has. 

You may play against a friend, against 
the computer or watch the computer play 
itself. On defense, you may choose from 
six different formations, each having differ- 
ent types of effectiveness on certain types 



of plays. On offense, you may choose from 
14 different offensive plays, or get a quickie 
scouting report. As I mentioned above, the 
actual game play itself is fast, with an aver- 
age game against the computer lasting 
maybe 15 to 20 minutes. When the com- 
puter takes on itself, games last about five 
minutes. This fast game is nice, as it actu- 
ally makes the possibility of replaying an 
entire season a reality. This would be im- 
possible with any of the other longer foot- 
ball games mentioned above. 
The game uses very realistic statistics for 
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Players perform as they do in real life. 
Quarterbacks will pick alternate receivers or 
scramble for first downs; so your long pass 
attempt might result in a two- or three-yard 

gain or loss. 



the players. However, since the game fea- 
tures no injuries, the program picks the ball 
carrier or passer on each play for you. The 
player is chosen based on the percentage 
of times he actually ran or threw or caught 
the ball. This is good in one respect, since 
the statistics generated by this game are in- 
credibly accurate. The bad point is when 
it is third and long, all of a sudden, Don 
Strock is throwing the ball instead of Dan 
Marino. Or you are faced with a third and 
one and you do not know whom the com- 
puter wUl choose to run the ball on the play. 
There are other things that take getting 
used to as well. First, all yardage is meas- 
ured in tenths during the game. For exam- 
ple, Payton carries on the inside run for 3.7 
yards, making it three and 13.3 to go. This 
bothered me until I realized that this was 
probably more realistic than the other foot- 
ball games, since rarely does a player in 
real life gain exactly three yards or exactly 
five yards. This sets up situations in 3 in 
1 Football where you really do have fourth 
and inches to go. And besides, when cal- 
culating stats at the end of the game, all 
yardage is rounded off as in real life to the 



nearest yard. 

Due to an oversight in programming 
(probably lost in a conversion somewhere) 
time on the clock does not always show all 
the necessary zeroes. For example, when 
the clock should say 2:08 left in the first 
half, it will say 2:8. This can be confusing 
sometimes as you might go from 2:43 to 
2:5 on a play, and it looks like the clock 
went backwards. Another programming 
bug crops up when displaying accumulat- 
ed seasons' statistics. After looking at the 
first team, the program will not allow you 
to look at another team without first quit- 
ting the stat-viewing program and reload- 
ing it again. 

Also, printing statistics to your printer 
results in a tremendous waste of paper, as 
each screen is dumped in total to your 
printer even if it might contain 20 blank 
lines. Since there are about five screens of 
information, the results of one game can 
cross several pages. 

After all this, you're probably saying that 
this game has some real problems. Au con- 
traire, mon ami. Sure, it has what I con- 
sider small problems, but most of these are 




due in part to being translated from so 
many computers and not taking advantage 
of all the Atari's features. I feel the game's 
pluses far outweigh its minuses. In fact, the 
game has so many great features, Tm afraid 
I might miss some! 

Let's see, I already mentioned how ac- 
curate the statistics were and how fast the 
game plays. Let's get back to the accuracy 
of the game first. Players really do perform 
as they do in real life. Quarterbacks will 
pick out alternate receivers or scramble for 
first downs, so your long pass attempt 
might only result in a two- or three-yard 
gain or loss. When playing against the com- 
puter, teams play as they do in real life, "ibu 
can expect the Rams to keep it on the 
ground with their boring philosophy, while 
Miami will be sure to air it out quite a bit. 
Playing Tampa Bay against Chicago is 
usually the mismatch it is in real life. 

The computer coach is good. It will run 
a lot more if leading in the last quarter, and 
throw more if behind. The game features 
a two-minute offense in the NFL version, 
and you can work the clock by throwing 
sideline passes, calling time-outs and run- 
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ning a "hurry up" offense. Games can be 
played in either team's stadium or at a neu- 
tral site as is done for the Super Bowl. 

The game keeps a complete record of all 
game statistics, and they may be shown on 
the screen or on your printer at the end of 
the game. The game also includes a statis- 
tics compiler that will keep track of a 
team's record and the accumulated statis- 
tics for all its games. So not only does the 
game play fast enough to complete an en- 
tire season, but at the end you will have 
complete statistics for every team. All this 
is included at no extra cost. 

I have saved the best for last. How many 
teams do you get with the game? 50? 100? 
Try almost 600! That's right, almost 600 
completely rated and accurate teams with 
all the player types and team ratings I've 
mentioned above. You get all 28 NFL 
teams from 1986, 180 college football teams 
from 1986 and 12 WFL teams from 1974. 
(Normally the USFL had been included, 
but since the USFL did not play in 1986, 
the WFL teams were included instead. 
Don't ask me why.) You also get 174 of the 
best college football teams of all time, in- 



cluding the 1967 use team with O.J. 
Simpson. 

And last but not least, you get 96 NFL 
teams from past seasons. Or do you? Here 
was where I got a big surprise. I just hap- 
pened to be poking around on the disk with 
the old-timer NFL teams when I noticed a 
team that was not on the list that was enclosed 
with the game. Looking a little closer at the 
list that came with the game, I noticed some 
team numbers were missing. It turns out that 
you actually get not 96, but 189 past NFL pro 
football teams on the disk! With all the pro 
teams available on this disk, you can replay 
every Super Bowl from 1966 to 1982. Tak- 
ing my hometown Buffalo Bills as an exam- 
ple of the wide range of teams that are 
offered, you can play with the Bills' teams 
that are included from 1986, 1981, 1975, 1974, 
1973, 1971, the 1-12-1 1968 team with Eddie 
Rutkowski, 1966, 1965, 1964 and even the 
1948 Buffalo Bills of the AAFC! Imagine, 11 
different Buffalo Bills are yours to coach. 

If you are a fan of some other team like 
the Miami Dolphins, Oakland Raiders or 
Dallas Cowboys, you will find an equally 
large range of your favorite teams to choose 



from. It is really quite interesting to play 1972 
Miami with Bob Griese, Larry Csonka and 
Jim Kiick against Vince Lombardi's 1966 
Green Bay Packers with Bark Starr, Boyd 
Dowler and Jim Hornung. All the greats are 
here to coach in their prime: Joe Namath, 
O.J. Simpson, Jim Brown, Otto Graham, 
Walter Pay ton, Fran Tarkenton and many, 
many more. 

All in all, you get a total of 583 past and 
present, college and pro teams. That alone 
makes this game a great value. Add the great 
statistical accuracy and your ability to replay 
some "dream" football games, and you have 
a real winner that is a definite bargain and 
a great enjoyment. 



Dave Arlington, an Atari devotee since 
1983, has recently graduated with anA.S. in 
computer science and math. He is rediscover- 
ing his Atari while looking for ' 'real ' ' em- 
ployment. He enjoys programming in Action! 
and computer simulations of all types. ^ 
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BASIC 
Editor n 



by Clayton Walnum 



BASIC Editor II is a utility to help you 
enter BASIC program listings pub- 
lished in ANALOG Computing. To 
simplify the identification of errors, 
each program line is evaluated im- 
mediately after it's typed, eliminating the 
need for cumbersome checksum listings. 
When you've finished entering a program us- 
ing BASIC Editor II, you can be certain it 
contains no typos. 

An option is provided for those who wish 
to use standard BASIC abbreviations. Also, 
the program retains all Atari editing features. 
Finally, for those who prefer to type programs 
the conventional way, using the built-in edi- 
tor, a post-processing mode is available. It al- 
lows you to check typing after the entire 
listing has been entered. 

Typing in the Editor 

To create your copy of BASIC Editor II, 
follow the instructions below— exactly. 

Disk version: 

(1) Type in Listing 1, then verify your work 
with Unicheck (see Issue 39). 

(2) Save the program to disk with the com- 
mand SAVE '•D:EDIT0RL1.BAS". 

(3) Clear the computer's memory with the 
command NEW. 

(4) Type in Listing 2, then verify your work 
with Unicheck. 

(5) Run the program (after saving a back- 
up copy) and follow all the on-screen 
prompts. A data file will be written to your 
disk. 

(6) Load Listing 1 with the command 
LOAD "EDITORLl.BAS". 

(7) Merge the file created by List- 
ing 2 with the command ENTER 
"D.ML.DAT". 



(8) Save the resultant program with the com- 
mand LIST "D:EDnDRII.LSr". 

Cassette version: 

(1) Type in Listing 1 and verify your work 
with Unicheck. 

(2) Save the program to cassette with the 
command CSAVE. (Do not rewind the 
cassette.) 

(3) Clear the computer's memory with the 
command NEW. 

(4) Type in Listing 2 and verify your work 
with Unicheck. 

(5) Run the program and follow the on- 
screen prompts. A data file will be written to 
your cassette. 

(6) Rewind the cassette. 

(7) Load Listing 1 with the command 
CLOAD. 

(8) Merge the file created by Listing 2 with 
the command ENTER "C:". 

(9) On a new cassette, save the resultant pro- 
gram with the command LI^ "C: ". 

Using the Editor 

Take a look at one of the BASIC program 
listmgs in this issue. Notice that each program 
line is preceded by a two-letter code. This code 
is the checksum for that Une; it's not a part 
of the program. 

To enter a program listing from the maga- 
zine, load BASIC Editor E with the ENTER 
command, and run it. You'll be asked if you 
wish to allow abbreviations (see your BASIC 
manual). If you do, type Y and press 
RETURN. Otherwise, type A^. 

Note: If you set BASIC Editor II to allow 
abbreviations, the program will run slightly 
slower. 

Your screen will now be divided into two 
"windows." The upper window wUl display 
each line after it's processed, as well as the 



checksum generated for that line. The lower 
window is where program lines are typed and 
edited. 

When the program's waiting for input, the 
cursor will appear at the left margin of the typ- 
ing window, lype a program line and press 
RETURN. The line wQl be evaluated and 
reprinted in the message window, along with 
the checksum generated. 

If the checksum matches the one in the 
magazine, then go on to the next program line. 
Otherwise, enter the command E (edit) and 
press RETURN. The line you just typed will 
appear in the typing window, where you may 
edit it. When you think the line has been cor- 
rected, press RETURN, and it'll be 
reevaluated. 

Note: You may call up any line previously 
typed, with the command E followed by the 
number of the line you wish to edit. For ex- 
ample, E230 will print Line 230 in the typ- 
ing window. Do not attempt to edit any 
program lines numbered 32600 and higher 
These lines fall within the BASIC Editor II 
program. 

If you're using BASIC abbreviations, the 
two versions of the command E work slightly 
differently. The command £, without a line 
number, will call up the line exactly as you 
typed it. When you append the line number, 
the line will be printed in its expanded (un- 
abbreviated) form. 

Leaving the Editor 

You may leave BASIC Editor n at any time, 
by entering either B (BASIC) or Q (quit). If 
you type 5, the Editor will return you to BAS- 
IC. Enter LIST to review your work, if you 
wish. Note that lines 32600 and above are the 
Editor program. Your work will appear be- 
fore these lines. To return to the Editor, type 
GCnO 32600. 

Type Q, and you'll be asked if you really 
want to quit. If you type Y, the Editor pro- 
gram will be erased from memory, and you 
may then save your work in any manner you 
like. If you type N, the Q command will be 
aborted. 

Large listings 

If the program you're entering is particu- 
larly long, you may need to take a break. 
When you want to stop, type Q and press 
RETURN, then save your work to disk or cas- 
sette. When you're ready to start again, load 
the program you were working on, then load 
BASIC Editor E with the ENTER command. 
Type GOTO 32600, and you're back in 
business. 

NOVEMBEH A.N.A.L.O.Q. Computing 



The post-processor 

Many people may not want to use BASIC 
Editor n when entering a program listing, 
preferring, instead, the Atari's built-in editor. 
For that reason, BASIC Editor n will allow 
you to check and edit your programs after 
they've been typed. 

To take advantage of this option, type any 
magazine program in the conventional man- 
ner, then save a copy to disk or cassette (just 
in case). With your typed-in program still in 
memory, load BASIC Editor n with the 
ENTER command, then type GOIO 32600. 

Respond with A^ to the "abbreviations" 
prompt. When the Editor appears on your 
screen, enter the command P (post-process), 
and the fu'st program line will appear in the 
typing window. Press RETURN to enter it into 
the Editor. 

The line will be processed, and the check- 
sum, along with the program line, will be 
printed in the upper window. If the checksum 
matches the one in the magazine, press 
RETURN twice, and the next line will be 
processed. 

If you find you must edit a line, enter the 
command E, and the line will be moved back 
to the typing window for editing. 

When the entire listing has been checked, 
you'll be asked if you wish to quit. Type Y 
and press RETURN. The Editor program will 
be removed from memory, and you may then 
save the edited program in any manner you 
wish. 

Murphy ^s Law 

Anyone who's been associated with comput- 
ing knows this is the industry Murphy had in 
mind. You may find that, after typing a pro- 
gram with BASIC Editor H, it still won't run 
properly. There are two likely causes for this. 

First, it may be that you're not following the 
program's instructions properly. Always read 
the article accompanying a program before at- 
tempting to run it. Failure to do so may present 
you with upsetting results. 

Finally, though you can trust BASIC Edi- 
tor II to catch your typos, it can't tell you if 
you've skipped some lines entirely. If your 
program won't run, make sure you've typed 
all of it. Missing program lines are guaran- 
teed trouble. 

One last word: Some people fmd it an un- 
necessary and nasty chore to type REM lines. 
I don't condone the omission of these lines, 
since they may be referenced within the pro- 
gram (a bad practice, but not unheard of). If 
you want to take chances, BASIC Editor 11 is 
willing to comply. 



When you've finished entering a 

program using BASIC Editor II you 

can be certain it contains no typos. 




J260B IF FL THEN 12616 

32502 DIM LSlllS>,SUS«lt51,C2St2>,BS(l 

lSl,MStHS>,SSt5BI,ESC65),a$tl>!FL=l!S 

TMI6B=PEEK tl361 +PEEK C1I7>»2S6 

J2604 GR0PHIC5 BiPOKE 71B, ! P=0 ! OBRrB ! 

? "flLLOW ftBBREUI0TI0K5"i 1 INPUT «S:IF « 

S="Y" OR OS="y" THEH aBR=l 

3Z606 BStl)=" "!BSC115)=" "l»St2>=BS 

32616 OPEN I117,4,8,"E1"!LS=" "1G05UB 3 

2662:5T<iRT=0 

3261B POKE 766,1:P0KE 81, 39 ! POSITION 1 

,3:IF LEHfLS)<35 THEH ? LSiGOTO 32624 

32628 IF LENtLS)<77 THEH 7 LSCl.SB)!? 

LS(3?,LEH(LS)) iCOTO 32624 

32622 ? LSC1,38J|7 LSC35,76JI? LSC77,L 

EN(L$)] 

32624 POKE 752,0:POKE 766,BiP0KE 55»,3 

4!P0KE 82,1:P0KE 83, 38 ! POSITION 8,181? 

" "illNPUT «17;LS:P0KE 766, l 
32626 IF tLS="P" OR LS="P"> OHO 5T*RT= 
B THEH P=llLSr"" 

32628 IF LS="E" OR LS="e" THEN E=1!P05 
ITION 1,10:? 5«S GOTO 32824 
32638 IF L$=;"n" UR L$="q" THEH 32698 
32632 IF LS="" OND P=l THEH 32686 
32634 IF LS="" THEM 32624 
32636 IF LS="a" OR LS="b" THEN GRAPHIC 
5 B:» "TYPE 'GOTO 32608' TO CONTINUE"! 
END 

32638 IF L«C1,1>="E" OH LS(l,lJi"e" TH 
EN E=llTRflP 32624:EL=UflLtLSt2>l IPOSITI 
ON 1,9ILI5T EL:G0T0 32624 
32648 5US=LSiTR0P 32624 : ll = UftL ILSJ 
32642 ST«HT:11IF P «ND HOT E THEM 126 
S2 

32644 G0SU8 32674: IF NOT OBR OR P THE 
N 32652 

32646 POKE 766,8:? CHR$(12S) ! POSITION 
B,3:L=«(ILILS> !LIST L:7 I? 17 "C0HT"1LS 
=BS 

32648 POSITION B.BIPOKE 842,13l5T0P 
32656 POKE 842, 12 1 fl=U5R tOOR ISS) , ABH ILS 
1,4) lLS=tSCl,<l) 

32652 CHK5UM=USR COOR CHS J , ADR JLS> ,LEN tt 
SI J lCHK5UM=CHK5UMtPEEKClS42)»55536 

32654 CHK=CHK5UM- [INT (CHK5UM/676)«678J 
:HI=IMT(CHK/26) : LO=CHK- tHUtZB) :C2Stl>= 
CHRSCHI+65) :C2SC2)=CHRS(L0t6S> 

32655 IF HOT P OR E THEH E=B1G05UB 32 
662:IF NOT P THEN 32688 

32658 POKE 83,3»!P0KE 7S2,llF0R K=3 TO 
SlPOSITION 1,K:7 BSCl,38i IPOSITION 1, 
Ht7:? BS(1,38> :HEKT HlPOKE B3,38 
32668 POKE 766,1:P0KE 83, 38 : POSITION S 
,71? C2S1P0KE 7S2,0:GOTO 32B1B 
32662 OOSUB 327821P0KE 766,81PaKE 752, 
l:? "IS"1P0KE 82,llBL=PEEKtS601t2S6KPEE 
K(561>»4 

32664 POKE BL-1, 78 1 POKE DL*2,6IP0KE BU 
♦I,112:P0KE BLt4,112lP0KE BL*5,112:P0K 
E DL+13,112:P0KE BL+14,112 
32666 POKE [)L»22 , 112 : POKE BL+23,112:P0 
KE DLt24,65;P0KE 0L*25, PEEK tS601 1 POKE 
BLt26,PEEKC561) IPOKE 83 ,39 
32668 POSITION 20, Bl? ■■'— 

ffl" :POSITION 8, 7;' ■■ 
!n:i'i'i ; i _- 

3267 POSITION 8,1: 

IIIB IIMI ■■■■■I iW 




32672 POKE 559, 34 1 RETURN 

32674 GRAPHICS OIPOKE S59,8lP0KE 766,1 

IPOKE 82,e:P0KE 83,39IP0SITION 8,31? L 

$1? :? 1? 1? "C0NT"1P05ITI0N 8,0 

32676 POKE e42,lI:3TOP 

32678 POKE B42,12:TRAP 3Z6S2! A=USR(AOR 

(ES),MALCL*J>IIF A=4 THEH POP ICOTO 32 

682 

32688 RETURH 

32682 GOSUB 32662:S0UNB 8, 75, IB, 8 :FOR 

K=l TO 20:NEHT HlSOUNB 8,B,0,0:P0SITI0 

N 1,31? "SVNTAH ERRORM'IPOKE 766,1 

12684 POKE 83,3S1P0SITI0H 1,181? SVSlG 

OTO 32524 

32685 LINEiPEEK tSTMTABJ ♦PEEK tSTMTAB+lJ 

»2S6:IF LINE>32599 THEN 32698 

32688 0FS=PEEKt5TMTABt2> 1 STMTAB=STMTAB 

+0F5:P0SITI0H 1,91LIST LINE:GOTO 32624 

32590 POKE 766,B:P0SITI0N 1,1817 "REAB 

Y TO OUIT";iINPUT ASlIF AS<>"Y" THEN P 

05IT10N 1,101? B$C1,38]1GOTO 32624 

32692 GRAPHICS 8:7 1? 1? IFOR K=32688 

TO 32636 STEP 21? KlNEXT Kl? "C0NT"1P0 

SITIOH 8, OIPOKE B42,131ST0P 

32694 POKE 842, 12 1 GRAPHICS Bl? 1? 1? 1 

FOR K=32638 TO 3Z674 STEP Zl? XINEXT X 

I? 1? "C0NT"1P0SITI0H 8,8 

32596 POKE 842,13lST0P 

32698 POKE 842, 12 : GRAPHICS 81? 1? 1? I 

FOR X=32676 TO 32782 STEP 21? XINEXT X 

1? t? "POKE B42,1Z"1P0SITI0N 8,8 



32708 POKE 842,1315T0P 

32702 POKE 16,112lPaKE 53774, 1121RETUR 

H 



CHECKSUM DATA. 

(see issue 39's Unicheck) 



32600 BATA 6,665,923,757,609,171,225,8 
98,532,499,910,267,912,144,735,8453 
32638 BATA 97,358,230,693,705,878,317, 
127,36,597,238,258,162,430,168,5315 
32668 DATA 864,953,472,385,687,724,72, 
687,908,735,525,612,672,164,891,9672 
32598 BATA 8,856,85,949 




Listing 2. 
BASIC listing. 




M 

•mm 



10 DIH L$(1Z0J,MLS(11»>,ASCU 
20 GRAPHICS OlPOKE 710,81? "Q15K OR QA 
SSETTE"; lINPUT ASlIF AS<>"C" AHB AS< 
D" THEN 20 

30 IF AS="C" then SB 

40 7 "PLACE FORMATTED DISK IN DRIWE"!? 
"THEH PRESS RETURH" 1 INPUT tSlOPEN 01, 
8,0,"D:ML.DAV";GOTO 60 

50 ? :? "READY CASSETTE, PRESS RETURN" 
;:XNPUT LS:OPEN l:l,8,0,"Cl" 
60 LS="32608 MS(l)="lLSfl3J=CHRSt34) 
70 H=119!G05UB 138 :LS 1141 =MLS tl,58> 1L$ 
(LENtLS)tl)=CHRS(34) 1? tll;L$ 
80 LSC1)="32610 M5l59>="lL$(14)=CHRSt3 
41 1LS(15]=HLSI59] iL$CLEN(L$)«1]=CHR$(3 
4) 17 ni;LS 

90 L$tlI="3Z61Z SS=":LStlB>=CHR$J34> 
100 MLS="";H=98:C05UB 138 : LS C11J=MLS 1 L 
StLENCLSltl)=CHRS(34) 1? ai;L$ 
110 LStl)="3Z614 ES=":LSC10>=CHRSl34) 
120 MLS="":N=69:G05UB 138:LStllJ=MLSlL 
$(LEHtLS)tll-CHRSC34) :? ISljLSlEND 
130 FOR K = l TO N:READ A 1 HLS CX] rCHRS (A] 
INEKT XIRETURN 

140 BATA 104,104,133,204,104,133,203,1 
04,104,133,205,169,0,141,3,6,141,2,6,1 
41,4,5,141,5,6 

ISO BATA 141,5,6,Z38,3,6,3Z,6e,Z18,17Z 
,Z,6,177,Z03,133,Z12,32,178,217,32,182 
,221,32,68,218 

168 BATA 173,3,6,133,212,32,178,217,32 
, 219, 218, 32, 210, 217, 165, ZIZ, 141, 8, 6, 16 
5,213,141,1,6,24 

178 DATA 173,0,6,109,4,6,141,4,6,173,1 
, 6, 189, 5, 6, 141, 5,6, 144, 3, 238, 6, 8, 238, Z 
188 DATA 8,172,2,6,196,205,208,176,173 
,4,6,133,212,173,5,6,133,213,95 
190 DATA 104,104,133,204,184,133,203,1 
04,104,141,255,6,169,6,133,213,216,155 
,88,133,205,165,89,133,206 
2BB DATA 174,255,5,24,165,285,185,48,1 
33, 285, 144, 2, 230, Ze&, 202, 288, 242, 160, 8 
,177,205,201,64,144,18 

218 DATA 201,96,144,19,201,128,144,18, 
201,192,144,6,201,224,144,7,176,8,24,1 
05,32,144,3,56,233 

220 DATA 64, 145, 203, 200, 192, 114, Z40,Z, 
Z08,215,177,ZB3,Z01,S2,2B8,3,136,Z8B,2 
47,200,132,212,96 

230 DATA 104,104,141,254,6,104,141,253 
,6,169,0,133,213,216,165,136,133,285,1 
65,137,133,206,160,0,177 
240 DATA 205,205,253,6,288,8,280,177,2 
05,205,254,6,240,15,160,2,177,205,24,1 
01,205,133,205,144,228 

250 DATA 230,206,176,224,168,4,177,285 
, 281, 55, 248, 4, 168, a, 248, 8, 13Z, 212, 96 



CHECKSUM DATA. 

(see issue 39's Unicheck) 



18 DATA 283,265,465,644,294,973,652,27 
8,978, 797, 278, 275, 835, Z89,3B1, 7539 
SB DATA 355,94,254,428,935,848,588,41 ^_, 
,974,564,5435 iri 
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by LeRoy Baxter 



€11 




Ever wondered how the AUTO- 
RUN.SYS file worked with BASIC? 
Ever wanted to automatically run a 
BASIC program that wasn't named 
MENU? Ever had a conflict between 
the autorun loader and a machine-language 
routine that the program needed? How about 
a two-stage LOAD and ENTER situation? Or 
an AUTORUN.SYS for a language other than 
BASIC? 

I've seen a lot of AUTORUN.SYS makers, 
but none have resolved all the questions and 
few that will let you autorun any program but 
MENU. 

I disassembled one of my AUTORUN.SYS 
files and delved into its secrets. I made some 
changes and eliminated some potential 
problems. The result is Listing 1, an AUTO- 
RUN.SYS maker that is more flexible than 
any you've ever seen. It works with any Atari- 
type DOS (DOS 2.5, MyDOS, etc.) and with 
any language. 

The secrets revealed 

Normally, when BASIC comes up, it 
prints the READY prompt on the screen 
and then calls the editor to accept a line 
from the keyboard. While all the editor 
routines are in OS ROM, the designers of 
the Atari have allowed us unlimited flexi- 
bility by putting the address of the editor 
routines in a RAM table called HATABS. 
By replacing the editor address in 
HATABS, we can supply new routines that 
make the computer do what we want. 

The program is divided into three parts. 
The first part finds the vector for the edi- 



tor and replaces it with our own. The han- 
dler table is searched from the bottom up 
just in case a new E: handler has been load- 
ed. The second part is our new (and tem- 
porary) E; handler routine. It passes back 
a command line to BASIC without waiting 
for keyboard input, and then resets the E: 
handler vector to its original value. The last 
part is the BASIC command line itself. 
This can be anything that you could type 
on one line from the keyboard. You can 
change screen margins, change screen 
colors, play music, generate a graphics dis- 
play, load one program and enter another 
(and then run them), set up password secu- 
rity, call DOS— the list is endless and limit- 
ed only by your imagination. 

started 

Using MAC/65 or the Atari Assembler 
Editor, type in Listing 1 and save it. (You'll 
want to use it again many times.) Note that 
you can just list Line 10 and edit off the line 
number and semicolon to cause the program 
to be listed to disk. Next, change CMDLIN 
to reflect the BASIC command line you want 
executed. In Listing 1, the command line 
is: ? "Loading. . .MYPROG":RUN D:MY 
PROG.BAS." To insert the quote mark into 
the BASIC command line, it must be speci- 
fied by its ATASCII value ($22) as a 
separate byte. Your command line can be 
a maximum of 119 characters. 

To write the AUTORUN.SYS file, load 
the destination disk into your drive and as- 
semble Listing 1 to disk with the command: 
ASM,, #D: AUTORUN.SYS. 
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Getting 



IVe seen a lot ofAUTORUN.SYS makers, hut 

none that have resolved all the questions 
and few that will let you autorun any program 

but MENU. 



LIST »I>:aUT0BA5.SRC 

for creating ftUT0RUN.5YS 

MAC65 source code with 
conversions to Atari Assenbler 
Editor 



20 

30 

40 

50 

60 

65 

70 

80 ; Equates: 

90 HATflB5 = 

0100 TEMP = 

0110 ; 

0120 »= 

0130 ; 

0140 ;Nodify the Handler table 

0150 MAIN 

0160 LDX tt36 ; search froM END 

0165 ; of table 

0170 ELOOP LDA HATABS,X 



$031A 
$CB 

$4000 



;or anywhere 



0180 

0190 

0200 

0210 

0220 

0230 

0240 CHANGE 

0250 

0260 

0270 



CMP tt'E 

BEQ CHANGE 

DEX 

DEX 

DEX 

BPL ELOOP 



INX 

5TX EDEX 



; for 



handler 



the table address 



;save HATAB5 loc 
LDA HATAB5,X ;and E: vector 
0280 STA TEMP 

0290 LDA n <NEHTAB ;or NEMTAB&$FF 
0300 5TA HATAB5,X 
0310 INX 
0320 LDA HATAB5,X 
0330 STA TEMP+1 

0340 LDA U >NEMTAB J or NEMTAB/256 
0350 STA HATABS,X 
0360 ;now transfer RDM table to RAN 
0370 LDY tt$00 
0380 STY YSAU 
0390 XLOOP LDA ITEMPJ,Y 
0400 STA NEHTAB,Y 
0410 INY 

0420 CPY »$10 ;16 BYTES 
0430 BCC XLOOP ;branch if <15 
0440 ;now setup new getbyte routine 
0450 LDA tt <NEMGET-1 
0455 ; or CNEWGET-1)&5FF 

0460 STA GETBYTE 
0470 LDA « >NEMGET-1 

0475 ; or tNEWGET-lJ/256 

0480 STA GETBYTE+1 



0490 RTS 

0500 ;Handler table space 

0510 NEHTAB 

0520 OPEN .NORD O 

0530 CLOSE .MORD 



;see Atari OS 
; Manual , 



0540 GETBYTE .WORD ;DeRe Atari, or 

0550 PUTBYTE .WORD ;Mappng the Atari 

0560 STATUS .WORD O 

0570 SPECIAL .WORD 

0580 JUMP .BYTE 0,0, i 

0590 .BYTE 0,0 

0595 ; 

0600 YSAU .BYTE 

0610 EDEX .BYTE 

0620 

0629 

0630 NEWGET 

0640 

0650 

0660 

0670 

0680 

0690 

0700 



!l6th byte 
& insurance 



;Our new GETBYTE routine 



LDY YSAU 

LDA CMDLIN,Y ;get 1 Char 



CMP «$9B 
BEQ DONE 
INC YSAU 
LDY tt$01 
RTS 



;if C/R then done 

;indx next char 
;tell O.S. OK 



PHA 

TXA 

PHA 

LDX EDEX 

LDA TEMP 



;save C/R 



;save X 



;find 'E:' 

; in HATABS 
STA HATABS, X ;replace our 

routine 

;with the real 
; vector 

LDA TEMP+1 
STA HATABS, X 

;restore X reg 



INX 



0710 DONE 
0720 
0730 
0740 
0750 
0760 
0770 
0775 
0780 
0785 
0790 
0800 
0810 
0820 
0830 
0840 
0850 
0860 J 

0870 CMDLIN ; 
0880 .BYTE 
PR0G",S22 
0890 
as", $22 

0900 .BYTE $9B J C/R! ! 
0910 : 

0920 ;set to execute when loaded 
»= $02E2 



register 
entry 



PLA 

TAX 

PLA 

LDY tt$01 

RTS 



;restore C/R to 
;set status OK 



passed to BASIC 
',$22, "Loading. 



MY 



BYTE ":RUN ",$22,"D:Myprog.b 



0930 
0940 



.WORD MAIN 
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Unlock your 

Atari 




COMPLETE POCKET 
PROGRAMMING AID 



ONLY $7.95 ea. 



ERROR CODES 
INTERNAL CODES 
PEEK & POKE LOCATIONS 
MACHINE LANGUAGE AIDS 
GRAPHIC MODE SPECIFICATIONS 
BASIC COMMANDS WITH ABBREVIATIONS 



ANALOG COMPUTING 



rUF wi MAGAZINE FOR ATARI COMI 



[COMPUTING] 



YES! 



Please send me 



ANALOG 



P^O. Box 16927 
N. Hollywood, CA 91615 



Name 



Computing Pocket Reference Cards 

I am enclosing $7.95 per copy. 

D CASH D CHECK D CHARGE 



Card # 



Address 
City 



State 



Zip 



Exp. date 
Signature 



BOOT UP 
TO BIG SAYINGS! 




1 YEAR lOR ONLY $28 

> SAVE $14 OFF THE COVER PRICE 

1 YEAR WITH DISK OHVI $105 



tSiP 






^^K^i'**'' 






SAVE TIME AND MONEY 
SUBSCRIBE TO ST40G 

SAVE $14 OFF THE 
COVER PRICE WITH 
THE CONVENIENCE 
OF HAVING ST-LOG 
DELIVERED DIRECT- 
LY TO YOUR DOOR 
BEFORE IT EVEN HITS 
THE NEWSSTANDS! 
GET THE MOST OUT 
OF YOUR COMPUTER 
SUBSCRIBE TO 
ST-lOG 
TODAY! 



U 1 YEAR @ $28 — SAVE $14! 

FOREIGN — ADD $7 PER YEAR 
D 1 YEAR WITH DISK @ $79 

FOREIGN — ADD $15 PER YEAR 




MCKYW 



DCKYW 



n PAYMENT ENCLOSED 
CHARGE MY: D VISA 



D BILL ME 
D MC# 



EXPIRATION DATE SIGNATURE 

MONEY BACK ON ALL UNUSED PORTIONS OF SUBSCRIPTIONS IF NOT SATISFIED. 



NAME 



ADDRESS 



CITY 



STATE 



ZIP 



MAKE CHECK PAYABLE TO L.F.P., INC., P.O. Box 16928, N. Hollywood, CA 91615. Offer expires January 
25, 1989. Your firsf issue will arrive in 6 to 8 weeks. 



WATCH FOR IT! 



B&C . 

ComputerVisions 



3257 KiferRoad 
Santa Clara, CA 95051 
(408)749-1003 



A 



STORE HOURS 
TUE- FRI 10am- 6pm 

SAT - 10am - 5pm 
CLOSED SUN - MON 



NEWFo 1050 SUPER ARCHIVER CHIP $69.95 



8-BIT INTEGRATED CIRCUITS 



$3.50 EACH OR 3.00 IN QTY OF 10 

ASSEN REV A 800 CPU 6502 RAM 6810 
BASIC REV A 810 ROM C POKEY 
MPU 6507 800 ANTIC PIA 6502 
PIA 6532 OS ROMS (499B-599B) 



$4.50 EACH OR 4.00 IN QTY OF 10 

1771 FDC XL CPU 14806 GTIA 
1050 ROM XL/XE MMU XL DELAY 



$12.00 EACH 

ASSEM REV B 
XE GATE ARRAY 
XL ANTIC 
VCS TIA 444 
BASIC REV C 
850 ROM B 
FREDDIE 
XL/XE OS 



NEW PRINTED CIRCUIT BOARDS WITH PARTS 



800 MAIN WITH CHIPS 10.00 

800 16K RAM 10.00 

810 SIDE WITH D/S 15.00 

810 ANALOG 10.00 



800 lOK 0/S 10.00 

800 POWER 5.00 

800 CPU W/GTIA 10.00 

810 POWER 15.00 



ATARI SPACE AGE 
ATARI STANDARD (2) 
ATARI TRAK BALL 
EPYX 500 JOYSTICK 



JOYSTICKS 

14.95 WICO 3-WAY 29.95 
12.00 WICO BAT HNDL 22.00 
25.00 NUMERIC KEYPAD 19.95 
19.95 ST MOUSE 45.00 



MISCELLANEOUS 



400/800 POWER PACK 10.00 

800/810 POWER PACK 15.00 
KLM 400/800 POWER PACK 5.00 

1030 POWER PACK 10.00 

800XL/XE POWER PACK 20.00 

2600 POWER PACK 5.00 

520ST POWER PACK 50.00 



800 KEYBOARD 40.00 
800XL KEYBOARD 25.00 
130XE KEYBOARD 35.00 
520ST KEYBOARD 75.00 
1040ST KEYBORD 85.00 
314/354 POWER 35.00 
1040 POWER PCB 75.00 



ATARI 810 

ATARI 810 on Plate 
ATARI 810 W/HAP 
BSC 810 



DISK DRIVES 

140.00 (130.00) 
100.00 ( 90.00) 
220.00 (210.00) 
140.00 (120.00) 



ATARI XF551 

199.95 

INDUS GT 

225.00 



PRICES IN BRACKETS DO NOT INCLUDE I/O OR POWER PACK 




DERE 
ATARI 

$10.00 



FIELD SERVICE MANUALS 
ATARI 400/800, 810 25.00 EACH 
ATARI 800XL, 850, 

1025, 1050 
SAMS 800,800XL, 

130XE, 1050 
SAMS 520ST 



20.00 EACH 



19.95 EACH 
35.00 



RUN MAC SOFTWARE ON YOUR ST 



MAGIC SAC 119.95 

TRANSLATOR 279.95 

MAC ROMS 39. 95 

PRT DRIVERS/FINDER 44.95 



lllllllllllllll 



lllllllllllllll 



ATARI 800 
ATARI SOOXL 
ATARI 130XE 



COMPUTERS & INTERFACE 

100.00 MPP-1150 INTERFACE 54.95 

119.95 MPP-1151 INTERFACE 74.95 

149.95 ATARI 850 125.00 



DIAGNOSTICS 

1050 DIAG. DISK 20.00 810/1050 DIAG. CART 25.00 

SALT 800XL CART 25.00 SALT 400/800 CART 25.00 

5-1/4" ALIGNMENT 40.00 3-1/2" SS ALIGNMENT 50.00 



HAPPY ENHANCEMENT VER . 7.1 
810 OR 1050 - $99.95 



ST INTEGRATED CIRCUITS 



DISK CONTROLLER WD1772 25.00 

PHOTO COUPLER PC900 

YAMAHA SOUND CHIP 

6850 ACIA 

68000-8 CPU 

KEYBOARD CHIP 



DMA CONTROLLER 26.00 
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28 


00 
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00 


VIDEO SHIFTER 


26 


00 


3 


95 


GLUE CHIP 


28 


00 


27 


00 


68901 MPF 


16 


00 


15 


00 









ATARI XE GAME MACHINE $139.95 

INCLUDES MISSILE COMMAND, FLIGHT SIMULATOR H, 
BUG HUNT, LIGHT GUN, JOYSTICK, BASIC, AND 64K OF 
MEMORY WITH A REMOVEABLE KEYBOARD. ADD A 
DISK DRIVE AND PRINTER FOR A COMPLETE HOME 
COMPUTER SYSTEM! 

WE CARRY A FULL LINE OF CARTRIDGES FOR THE XE 
GAME MACHINE. 
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RECONDITIONED ATARI MERCHANDISE 

All merchandise has been tested and reconditioned and is in like-new condition except where noted. 30 day warranty . 



ATARI 

TRAK BALL 
$9.95 

SPICE UP THE ACTION IN 
YOUR ARCADE GAMES! 



400 (16K) 

COMPUTER 
$29.95 

48K UPGRADE KIT 
$25.00 



ATARI 
SPACE AGE 
JOYSTICK 

$5.00 



1030 
MODEM 

WITH 

EXPRESS! 
$29.95 

GET ONLINE TODAY 




1020 COLOR 

PLOTTER/ PRINTER 

$29.95 

40 Columns wide 

Includes paper and 

color pen set 



800 (48K) 

COMPUTER 

$79.95 



INCL. BASIC CART & 
MANUAL 



600XL(64K) 
$59.95 

Upgraded to run newer 
64K software - includes 
Basic & power supply 



NUMERIC 
"^ KEYPAD 

$7.95 

INCL HANDLER DISK USE 
WITH BASIC & 
BOOKKEEPER 



ATARI 

BOOKKEEPER 

$14.95 - NO BOX 

($19.95 WITH RECON KEYPAD) 

$24.95 - IN BOX 
(29.95 WITH RECON KEYPAD) 



DISKETTES 

AS LOW AS 20 CENTS 

10-FOR $4.00 

100 FOR $29.95 

1000 FOR $200 

MOST ARE UNNOTCHED 
WITH OLD SOFTWARE 



SHIPPING INFORMATION - Prices do not include shipping and handling. Add $5.00 for small items ($8.00 Min. for Canada), Add $8.00 for 
disk drive. Calif, res. include 7% sales tax. Mastercard and Visa accepted if your telephone Is listed in your local pfione directory. Orders may be 
pre-paid with money order, cashier check, or personal check. Personal checks are held for three weeks before order is processed. C.O.D orders are 
shipped via UPS and must be paid with cash, cashier check or money order. International and APO orders must be pre-paid with cashier check or 
money order. $20.00 minimum on all orders. All sales are final - no refunds - prices are subject to cfianoe. Phone orders acceoted TUESDAY 
THROUGH FRIDAY from 10:00 am to 6:00 pm PST. 

We carry a complete line of ATARI products and have a large public domain library. Write or call for free 
catalogue. (408) 749-1003 TUE - FRI 10AM - 6 PM 



PRICES SUBJECT TO CHANGE WITHOUT NOTICE - ALL SALES ARE FINAL 
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Again we are witness to yet another 
software market cycle. As you might 
have noticed by now, an alarming 
number of software publishers are 
weaning out Atari 8-bit support. 
Some new titles, which I'm certain would be 
good sellers, and most of which probably 
don't require more memory than the XL/XE 
series provides, just aren't in our language. 
It's getting hard to find two games a month 
to examine for you, much less the four or five 
I used to be able to play. And though this 
sounds like the beginning of the end and is 
extremely distressing to Atari newcomers, 
there has been an unexpected but welcome 
side effect. 

I'm starting to see a lot of independent 
producers and developers jumping into the 
water. And while some of their stuff is good, 
some bad and some mediocre, all of it is sen- 
sibly priced. The lack of high marketing, 
research and development and packaging 
costs is passed right on to us, the end users. 
This makes it a lot easier for a novice to stock 
his library with a lot of games of different 
types, where a few years ago he might only 
have been able to afford one or two. To make 
things even better, the big boys have seen this 
market niche as well, making us even bigger 
winners as they discount some of their older 
games, attempting to milk the few remain- 
ing dollars from their cash cows. If you pick 
and choose wisely, you can't help but be 
satisfied. 

So keeping these two facts in mind, I think 
what we'll do to kick off the holiday season 
is to look at some oldies, and a couple of new 
games from a new company. I'm going to 
start by bringing you all up to date on a few 
of the best thinking-man's games available for 
the 8-bit. Games which require not fast 
reflexes nor superb hand-eye coordination, 
but instead ask you to think. And because 
they demand more of you, I like them the 



best. For you action addicts, if you'll just 
hang around until the end, I promise you a 
photon fix. And if you're not careful, you 
might even learn something before we're 
done. 

When I think of thinking games, the first 
to come to mind is chess. Chess has been 
around for hundreds of years and is still com- 
plex enough to challenge the world's greatest 
minds. And when you feel up to the 
challenge, your Atari is ready for you, thanks 
to the Chessmaster 2000, from Elec- 
tronicArts, which I consider to be the best 
chess game available. In addition to having 
one of the most devastating decision-making 
algorithms available the program is also the 
most attractive, featuring a three-dimensional 
playing field which can be modified to your 
heart's content. Chock full of features, includ- 
ing multiple levels of difficulty, the ability to 
study the decision-making process and to 
print a log of moves, as well as all the stand- 
ard options like move take-back and board 
setup, this grand master is likely to keep you 
engaged for months. And if you don't know 
how to play, Chessmaster is more than hap- 
py to teach you. Experts revel in its library 
of classic games and the brief history of com- 
puter chess contained in the generous manu- 
al. For all these reasons, and many more, 
Chessmaster 2000 is the best chess simula- 
tion on the market and a must for all game 
libraries. 

Of course if you're a real masochist, you 
will probably love any of the many Infocom 
titles. These text adventures feature the most 
sophisticated grammatical parser available, 
and are able to understand complex and com- 
pound sentences. In fact, they often demand 
them. My favorite titles are the Zork trilogy, 
Station/all and Planetfall, Suspended, The 
Hitchhiker's Guide to the Galaxy &n& Leather 
Goddesses ofPhobos. And although this list 
indicates that I am partial to their comedy and 
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This grand master is likely to keep you 

engaged for months. And if you donH know how to play^ 

Chessmaster is more than happy to teach you. 



science-fiction titles, rest assured that, like 
a bookstore, Infocom has titles to suit every- 
one's taste. From mysteries to romances to 
adventures, nearly every computer user who 
loves a good story will find at least one title 
to keep them up at night— all night. And to 
make it even easier on the pocketbook, many 
of their 8-bit prices have been lowered, some 
to a mere $9.95. At that price it's pretty hard 
to go wrong. 

If you're into word games, there are a cou- 
ple of titles out there to confound you. The 
first which comes to mind is Buzzword. This 
game is very similar to the Family Feud tele- 
vision show (minus the obnoxious Richard 
Dawson). In this game, you choose a category 
and are then given nine letters which begin 
nine words. Also provided are the number of 
letters in each word and a pool of available 
letters. The object is to guess all the words 
in the category and amass the most points. 
Different levels of difficulty make for fami- 
ly fun, as children of all ages can participate. 
Many find the game is most fun when played 
in a group setting. There are thousands of 
words in the hundred or so categories provid- 
ed in the package— enough to keep the aver- 
age player active for months. In fact, each 
category can be replayed a number of times 
before the words will be memorized. Even 
though it is a little-known game from a little 
known company. Buzzword should not be 
overlooked. 

The second word game which comes to 
mind is Crosscheck from Datasoft. This word 
game reminds me of Scrabble, without all the 
wooden tiles to lose. Upon further examina- 
tion though, it is a very original and mul- 
tifaceted game. Up to four players take turns 
placing words on a crossword-style board. 
These words are guessed from clues given 
at the bottom of the screen. The number of 
letters in the word is determined randomly 
at the beginning of each player's turn by a roll 
of the electronic dice. Different versions of 
the game contain different objectives. You can 
race to connect two areas of the board or play 
for points, with or without a time limit. The 
board is huge with a magnify feature allow- 
ing you to zoom in to place your word in the 
best strategic position. And while some of the 
clues are simple, additional clue libraries en- 
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sure Crosscheck lovers are not left in the 
dark. Truly a diamond in the rough, and 
worth a look. 



Solar Star 

by Glenn Cassim 

Drop Zone 

by Archer Maclean 

Microdaft 

19 Harbor Drive 

Lake Hopatcong, NJ 07849 

Here we are in phase two of this month's 
discourse. A look at a couple of new games 
from a new company. The new company is 
Microdaft (which gets the award for the 
stupidest name), and the first game is Drop 
Zone. Or should I say the first game is 
Defender, as Drop Zone is a copy of Wil- 
liam's arcade classic nearly verbatim; the 
only difference being that you are represent- 
ed by a man in a spacesuit, rather than by 
a sleek star fighter. 

In case you didn't catch Defender the first 
time around, it is your basic space shoot- 'em- 
up, the main twist being the ruthlessness of 
the objects you encounter. Of course, in Drop 
Zone the names of all these items have been 
changed to protect the guilty. Androids and 
Nemesites, Spores and Nmeyes will plague 
you as you attempt to rescue your men who 
are stranded on a planet being overrun by 
aliens. 

Using the joystick, you move up and down, 
left and right. The space bar releases a smart 
bomb, which destroys everything on the 
screen, while any other key activates your 
cloak, which makes you invisible to the ene- 
my. The only other key you need to worry 
about is the escape key, which pauses the ac- 
tion when you feel you need a break. There's 
not a lot to learn about in this game— no great 
secrets. But what it lacks in complexity it 
makes up for in sheer difficulty. Each suc- 
cessive wave of enemy onslaught wiU tax your 
arcade skills to their limits. 

The graphics are surprisingly good, given 
I've come to expect so little from 8-bit games 
of late. The action moves every bit as fast as 
any arcade game I've seen, commercial or 



otherwise, and the joystick is very respon- 
sive. The effect as you explode is especially 
impressive. The slight manual explains each 
control succinctly, making Drop Zone a 
pleasant surprise. 

Solar Star is a little harder to describe, as 
it is one of those rare video games which was 
not inspired by or was not a rip-off of some- 
one else's idea. And as it is new and unusual, 
it is also a little harder to like. It might be 
described as an electronic game of tag, or it 
might not. 

The background story concerns a giant 
energy grid which is used to supply space- 
faring vessels with solar fuel. Unfortunate- 
ly, the computers which were designed to 
protect the grid began to do their job a little 
too well, depriving ships of much-needed 
fiiel. Your mission is to gather as many ener- 
gy crystals as possible, blasting disrupters 
(the enemy) until they release a crystal. It's 
basically a race against time to complete the 
mission before you exhaust your energy. 

The screen is divided into four areas. The 
top half of the display contains a first-person 
point of view as you move about a large grid 
which is divided into areas by force fields. 
Contact with these fields reduces your ener- 
gy, and when you're out of energy, your game 
is over. The bottom right- and left-hand cor- 
ners contain overhead views of the grid, in 
increasing degrees of magnification. Cen- 
tered in the bottom of the screen is a readout 
area to keep you abreast of the various game 
parameters, such as score and speed. This is 
a lot to keep track of, and what made it more 
confusing was the fact that I used one of the 
bottom displays more than the large main 
view. 

Collect enough crystals, and you'll move 
on to the next level. The graphics are pretty 
standard stuff, about at the level of the 
2600— blocky but fast-moving. The manual 
is fraught with misspelled words, but other- 
wise accurate. I didn't really like this one as 
much as Drop Zone, and I can't recommend 
it. But I do praise it for its originality. 

That's about it for this month. Next month 
we'll take a look at the latest SSI simulation 
and evaluate it up against a new simulation 
from Datasoft. 

Until then, happy holidays. C\ 
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The hard-disk port 
on the back of your ST is 
really an amamgy and mostly 
overlooked^ addition to the ST computer. 



When the 520ST was first released, 
many of today's users were satis- 
fying their computing needs with 
an Atari 130XE or even an old 
Atari 800. This was 1985, when 
inflation was at its lowest point in years, and 
the economy seemed ready for something 
new. The Atari 520ST was introduced, and 
for the moment it seemed to be the hottest, 
newest, sleekest microcomputer on the block. 
It had more memory, terrific graphics and a 
hard-disk port built in! 

The hard-disk port on the back of your ST 
is really an amazing, and mostly overlooked, 
addition to the ST computer. If you own an 
IBM PC or an MS-DOS clone, adding a hard 
disk can become fairly difficult. There is no 
standard interface for hard disks on the PC, 
nor is there one for the Macintosh. So every 
hard-disk manufacturer has to determine their 
own product specifications, and this has led 
to a market filled with 101 varieties of hard 
disks. Some hard disks come on an IBM ex- 
pansion card, some have cables that connect 
to the PC's mother board, and some plug into 
your floppy -disk port and sit above your nor- 
mal floppy. They all look a little differently, 
sound a little different and operate a little 
differently. 

The ST, on the other hand, has one DMA 
port which is easily used as the standard hard- 
disk interface. Other people have used this 
port to connect optical scanners, laser printers 
and local area networks. Since the DMA port 
is included on all STs— Mega STs use the 
same port— all of the hardware manufac- 
turer's products have been designed to work 
with one another. The issue of adding a hard 
disk to an Atari ST could hardly be simpler. 
When the ST was first announced at the 
winter Consumer Electronics Show in 1985, 
there were some rumors that Atari was work- 
ing with Haba Systems, a computer software 
company in Los Angeles, California, that 
produced Commodore 64 and IBM PC soft- 
ware. Haba intended to produce a hard-disk 
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drive for the ST that would be bundled with 
some software and a 520ST. The complete 
package would be sold as a complete ST de- 
velopment system for developers. Haba was 
also putting together a series of classes on 
GEM programming for the ST. A turbulent 
year for Atari Corp. was 1985, and because 
of one thing or another, Haba's only ST 
product became their ST hard-disk drive. 

The Haba 10 was a ten-megabyte hard disk 
for the ST that sold for less than $600. Haba 
received a large amount of publicity for its 
announced hard disk mostly because Atari's 
more expensive 20-megabyte hard disk was 
the only other alternative. 

Haba sold a bunch of hard disks, but then 
the problems started to flood in. Haba's en- 
gineers didn't expect the ST's DMA port to 
be so electronically unstable. Many 520 and 
1040STS wouldn't work with Haba's hard 
disk. Haba eventually created an improved 
hard-disk interface which worked with all ST 
computers. 

Then many users found the Haba hard-disk 
operating-system software had bugs. Certain 
word processors would lose characters within 
a document file when the text was saved and 
loaded onto the Haba hard disk. The software 
problems were never corrected, mostly be- 
cause Haba was about to go out of business 
by the time the problems were identified. 

Supra Corp. began offering hard disks for 
the ST early on, but their prices were close 
to Atari's prices. Supra held the edge on the 
hard-disk market with several features not 
offered with the Atari or Haba disks. Supra 
offered superior operating-system software; 
users could create more partitions than the 
Atari hard-disk software allowed. Supra also 
found Atari's hard-disk boot software in TOS, 
which allowed the Supra's hard disks to auto- 
boot when the ST was first switched on. 

Other manufacturers began appearing for 
the ST. Astra, Calcom and others began offer- 
ing well-built, low-cost hard disks for the ST. 
In 1987, the price of a hard disk was down 
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to about $500 for 20 megabytes. Some com- 
panies even offered their interface cards for 
less than $150. With an interface card, any 
SCSI (Small Computer Serial Interface) com- 
patible hard disk could be attached to the ST's 
DMA port. SCSI hard-disk drives were be- 
ing sold in mail-order houses for less than 
$250, so if you were not satisfied with any 
of the commercial offerings, you could piece 
together the components and make your own 
hard-disk unit. 

Supra has just recently upgraded their 
hard-disk interface card to support several 
new features. The new card has a calendar 
chip which can update the ST system clock 
every time the system is switched on. Also 
included is an additional DMA output port. 
The second port becomes important for the 
Atari laser -printer (SLM804) owners who 
must plug their laser printer into the DMA 
port to print documents. The Supra DMA 
port lets you "daisychain" many DMA 
devices. The new Supra card is fully SCSI 
compatible, so any advertised SCSI drive 
should work with it. 

ST-Log built its own hard-disk system us- 
ing a Supra interface card. We started with 
some basic components: 

Atari 520ST 

(with one-megabyte memory upgrade) 

Supra Hard Disk Interface card 

Seagate 20-megabyte hard disk 

(with controller built in) 

Power supply 

Hard-disk enclosure 

The Seagate 20 hard disk costs $250. It 
came with an mtegrated controller, which was 
mounted on top of the hard-disk unit. A flat 
ribbon cable extended from the controller; it 
attached to the Supra interface card. The hard 
disk, controller and interface card were 
mounted into the front of a Haba hard-disk 
enclosure. The nice thing about using the 
Haba enclosure was the easy mounting of the 
hard disk, and the built-in power supply 



Atari 520ST 



provided the -1-5 and -1-12 volts D.C. power 
that the other components needed. These 
kind of enclosures are readily available from 
most mail-order houses. 

A special power cable was created to sup- 
ply the Supra interface card. The parts to 
build the cable were found at a local Radio 
Shack store. Total cost was around $10 in 
parts. 

A cable extends off of the Supra interface 
card that attaches to the ST's DMA port 
directly. When the power to the drive was 
switched on, we immediately found that the 
controller ribbon connector was plugged in 
upside-down. With a quick switch of connec- 
tors, we started the 520ST and the GEM 
Desktop appeared instantly. 

When you purchase the Supra interface 
card, the kit comes with all the disk operat- 
ing software and a small (26-page) manual. 
The disk operating system is completely 
GEM based, so it is easy to use and some- 
what intuitive. The software and interface 
card are somewhat sophisticated; when the 
formatting utility was started, the program in- 
dicated the correct type of hard-disk con- 
troller and drive being used. A couple of 
mouse clicks later, the formatting program 
was off and running. 

A special partifion control program was 
later used to determine the number of disk- 
drive partitions that would be used. Supra's 
unique software permits up to 12 partitions 
to be created. A partition appears on the 
GEM Desktop as a separate disk icon, so 
sorting your software into groups becomes 
easy. 

The entire process of building a hard-disk 
system and installing the system software took 
less than three hours. The project cost was 
about $475. ST-Log does not recommend that 
you try this yourself, because a fair amount 
of technical knowledge is required. However, 
with the modularity and easy availability of 
all of the parts, it is amazing that more peo- 
ple don't try it! q 
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I'm late again. My deadline for this 
month's column has come and gone two 
days ago. I was all set to sit down tonight 
and write the column when I decided to 
log onto DELPHI and check out the 
latest Atari news and gossip. What a mistake. 
Mind you, it wasn't bad. It was, well, 
addictive. I've been doing a lot a traveling 
lately, so I had fallen behind on the 
ANALOG and ST-Log Atari SIGs. I signed 
on to DELPHI and have just spent the last 
two hours reading messages in the Forum 
section of the ST-Log group. 

If you want to know what is happening 
within the Atari community, talk with 
representatives from Atari and other hard- 
ware/software companies; DELPHI is the 
place to be. You can talk directly with the edi- 
tors and contributors of ANALOG and ST- 
Log. And best of all, other Atari users are 
available to answer questions or share your 
opinions with. 

Maybe you knew that already. If not, call 
DELPHI at (617) 491-3393 and find out how 
you can get a user login and begin to take ad- 
vantage of what is available on-line. Of course 
there is more to the DELPHI service than just 
the Forum. Files are available for download- 
ing, electronic mail can be sent and received, 
and there is always plenty of excitement wait- 
ing for you in the ANALOG and ST-Log 
groups. 



It has happened to me and I'm sure it has 
happened to you. You read an ad about a new 
piece of software in ANALOG or perhaps a 
rave review about a product that you have 
been waiting for. So you rush out and buy it. 

Once you get it home, you tear open the 
package, shove the disk in the drive and boot 
the machine. As the program is loading, you 
glance at the owner's manual, and there you 
see it: "[The software company] makes no 
expressed or implied warranty with respect 
to the program's quality, performance or fit- 
ness for use." Then it goes on for another 
couple of paragraphs that only a lawyer can 
understand. 

Most reputable software companies only 
warrant the physical media (the disk) and will 
replace it if defective. But what if the pro- 
gram isn't so great? What if it is so difficult 
to use that you would never subject your worst 
enemy to its use? Or what if the program just 
doesn't fit your needs? What do you do? Who 
ya gonna call? Program Busters? No. You're 
stuck. No two ways about it. 

I use a MS-DOS computer quite a bit and 
I recently saw an advertisement in a maga- 
zine that amazed me. The ad was for a 
product called Excel, a spreadsheet program 
that runs on a PC. The company is Microsoft, 
the largest PC software publisher. 

The ad was titled "The Microsoft Excel 
Win-Win Guarantee." It read, in part, "If you 
find a spreadsheet you like better between 
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now and January 31, 1990, we'll give you your 
money back. No questions asked." Whew! 
Can you believe that? I have never seen any- 
thing like it. 

Here is a company that not only stands be- 
hind their product, but goes as far as guaran- 
teeing that you'll like it. They guarantee that 
Excel will meet your needs. They want you 
to be satisfied with the program or you get 
your dollars back— without a hassle and for 
the next year and a half. 

Now, I normally don't write about MS- 
DOS programs in ANALOG. Neither does 
anyone else for that matter But I just had to 
share this with you. Microsoft is to be con- 
gratulated for having a software policy the 
way it ought to be. Can you imagine if Atari 
had a policy like that? Can you? 

8-bit software 

It's no secret that new 8-bit software is be- 
coming more difficult to find these days. The 
fact is, very few companies are publishing 
new titles for the Atari computer Even many 
of the "big" companies that have supported 
the 8-bit machine in the past, such as Elec- 
tronic Arts, Batteries Included, OSS, Datasoft 
and Synapse, have either gone out of busi- 
ness or have had their more popular titles 
bought by another company. 

I just received a new catalog in the mail 
from ICD. ICD has been around since 1984 
and has had many innovative products for the 
8-bit computer In January of this year, ICD 
bought the OSS product line and continues 
to publish OSS products and provide support 
for them. Following is a brief look at some 
of the current ICD family of products. 

The P:R: Connection is a flexible, compact 
and more economical alternative to the Atari 
850 interface. It plugs into the disk drive 
(serial) port of any 8-bit Atari computer and 
provides two RS-232 serial ports and one Cen- 
tronics parallel port. It takes its power from 
the computer, and its serial ports possess the 
same signals and functions as the 850 Inter- 
face, including the R: handler The P:R: Con- 
nection sells for $90. 



The $60 Printer Connection provides a 
Centronics parallel capability in a very small 
package. One end of the ten-foot cable plugs 
into any 8-bit computer (the 1200XL requires 
a slight modification) and the other end plugs 
into a parallel printer jack. No external power 
supply is necessary. 

If you want to expand the memory on your 
800XL or 1200XL to 256K, the ICD Rambo 
XL is what you need. This $40 upgrade board 
(DRAM chips are extra) not only makes your 
800XL or 1200XL a 256K computer but also 
makes the memory compatible with that of 
the 130XE. This lets you take advantage of 
software that can use the extra memory as 
well as allow you to use a 128K RAMDisk. 
You'll need to be familiar with soldering to 
install this upgrade. 

For advanced users, ICD offers the Multi 
I/O. This product features five functions in 
one box. It provides RS-232, parallel and 
hard-disk interfaces for your computer It also 
gives you a either a 256K or one megabyte 
RAMDisk, of which any amount can be used 
as a print spooler The former sells for $240 
and the latter $470. 

If you have an Atari 1050 Disk Drive and 
want to upgrade it, the US Doubler chip set 
will do the job. The $40 upgrade will give 
your 1050 true double-density capability for 
greater storage, 180K per disk. Once upgrad- 
ed, the drive will be compatible with single- 
density (90K) disks and the dual-density 
(130K) disks. When used with SpartaDOS, 
the US Doubler will also triple the I/O speed 
of your computer and disk drive. 

The SpartaDOS Construction Set is ICD's 
own DOS that is compatible with just about 
any disk drive you can use with your 8-bit 
Atari. It supports single, dual and double den- 
sity, 40- and 80-track 5 W -inch drives and 
eight-inch drives with the Percom or 
ATR8000. It supports the 360K Atari XF551 
drive and hard disks. The $40 program also 
provides date/time stamping of files, sub- 
directories, a menu-oriented program for 
rapid file copying and erasing and more. I 
have been using SpartaDOS for several years 



and have found it to be the best DOS availa- 
ble for the Atari 8-bit computer. 

SpartaDOS Z is a cartridge-based DOS 
that includes all of the features of SpartaDOS 
and more. This $80 cartridge features multi- 
file operations, high-speed I/O with US Dou- 
bler, Indus GT and Atari XF551 drives, the 
use of batch files and more. In addition, you 
can piggyback another cartridge on top of the 
SpartaDOS X and operate just as if you had 
booted from disk, except much faster 

The R-Time 8 cartridge has a built-in bat- 
tery that provides continuous and automatic 
date/time stamping of your files. It too is a 
piggyback cartridge that permits you to use 
another cartridge at the same time. When 
used with SpartaDOS, the R-Time 8 works 
automafically, tagging each file you create 
with the correct time and date. It sells for $70. 

ICD is an excellent company, and I can 
highly recommend any of their products. If 
you would like more informafion about ICD 
products, contact them at: ICD Inc., 1220 
Rock St., Rockford, IL 61101; or call them 
at (815) 968-2228. Be sure to request their 
catalog which, incidentally, looks as classy 
as their products. 

Rumors 

What fun is it reading an "End User" 
column without a couple of rumors? I'm not 
one to start any rumors, but I am usually 
more than happy to pass them on. And with 
the way Atari both announces products be- 
fore their time and also plays things close to 
the vest, rumors are never far away. 

The latest "hot" rumor concerns a sup- 
posed ST game machine. That's right, an ST 
game machine. I'll call it, for lack of a bet- 
ter name, the Atari STGS (not very original, 
I know). Here are the "facts"(?). 

Since Atari is doing a "land office" busi- 
ness in video games and video-game systems, 
it seems only natural for them to come out 
with a game system based upon the 68000 
microprocessor This is the very same proces- 
sor used in the ST, Connmodore Amiga and 
Apple Macintosh. 

What will the STGS look like? A moment's 
consideration leads one to suspect that it will 
be roughly about the size of the 7800 game 
machine. It will probably not have a key- 
board, although it may have an interface for 
a keyboard and disk drive. It will use car- 
tridges for the game software. The price? 
How about under $200? A 68000-based game 
machine is really not a wacky idea. If this 
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product were true, it would be the first 
68000-based video game. One of the poten- 
tial roadblocks for this product, I think, is 
the need for at least a dozen game carts to 
be available for it upon its introduction. Fur- 
ther, other companies besides Atari must de- 
velop games for the STGS for it to be a 
success. 

This may not be a problem, though. In the 
last year, Atari has done an amazing job of 
licensing popular arcade video games, as well 
as working with third-party game developers 
for new game titles. Also consider the an- 
nouncement at the Summer CES that Nolan 
Bushnell and company will be developing 
new games for "Atari video-game machines." 
But on the other hand, an STGS would re- 
quire DRAM chips that are currently in short 



supply. If no new supply for these chips is 
found, the production of ST computers may 
suffer as the video-game machines are made. 
Further, if a STGS were made, and it became 
a big hit, what would that mean to the "game 
image" that Atari has earned? Is Atari a game 
company or is Atari a computer company? 
Can it be both? Has it been both? 

All in all, a very interesting rumor. 

Here's another one: Atari will introduce a 
laptop version of the ST with a built-in hard 
disk. This rumor is a little tougher to swal- 
low than the STGS. The last time Atari dis- 
played a portable computer, it was an 8-bitter, 
with a six-inch (I believe) monochrome, 
40-character screen. I think it was called the 
XEP and was shown at the first CES after 
the Tramiels took over Atari. 

Anyway, a portable ST may be a neat idea 
for some of us hard-core Atarians, but I don't 
think it would be a real challenge for the likes 
of Toshiba, Zenith or NEC. 

Here's an "oldie but goodie": an Atari CD- 
ROM player by year's end. Remember the 
"under $500" CD-ROM player Atari showed 
three years ago? The time was not right then, 
but maybe it is now. There's also some talk 
of an Atari 80286 PC clone. We'll see. 



At the summer CES, Atari's booth was all 
video games. There was hardly a computer 
in sight, not counting the XEGS. But sever- 
al independent sources, both inside and out- 
side of Atari, were talking about what Atari 
would be doing at the fall COMDEX (Com- 
puter Dealers Exposition) in Las Vegas. 

The talk centered on space. No, not the an- 
nouncement of a manned mission to Mars be- 
ing controlled by Atari ABAQ computers: 
floor space! It was said that Atari has some 
20,000 square feet of exhibit space reserved 
at the upcoming COMDEX. With that much 
space at a computer trade show. Atari may 
be planning to announce all of the above 
products and a dozen more. Stay tuned for 
what may prove to be the biggest Atari show 
yet seen. 

Remember, these are just rumors. They 
may or may not be true. Chances are that, 
like most rumors, they are based on fact, but 
the final outcome will be somewhat differ- 
ent than stated here. However, keep in mind 
that if we didn't care so much about Atari 
computing, we wouldn't care so much about 
Atari rumors. 

Keep on computing. See you next month. 
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Special OFFER 

The Alpho Systems HACK PACK contains ell our 

lines! producls for moking BQcl<-up copies, 

Analyzing, Underslonding and Protecting your 

Atari programs. It comes complete with Atari 

Protection Techniques (Book and Disk I), Advanced Protection Techniques (Book and Disk II), The 

Chipmunk, The Sconalyzer, The Impersonator and Disk Pack 1 000. Worth over $1 50. Get them all 

for Itie special pnce of Jusf $99.95 

Atari Software Protection Techniques Vol I & II 

These Book and Disk pockoges detail the most advanced copy protection methods in use today Tliey 
guide you through the methods used to create the protection as well as the copying techniques to gel 
around them Tt'iey include information on Phreaking • Hacking • On-line security • Block boxes • Sell- 
destructing programs • Pirate bulletin boord systems • Logic bombs • New piracy laws • Hardware 
data keys • Weok sectoring (Phantom, Fuzzy and unstable sectors) • Overfilled tracks • CRC errors 
Bonk Select cartridges and lilUCH, MUCH I^ORE. The disks include automatic program protectors. 
Protection Scanners, directory hiding and more, 
BOOK i and DISK I $24.95 

BOOK II (Advanced protection) and DISK II $24.95 
Special Offer, Order l»fli sets for Only $39.95 

CHIPMUNK 

Automatic Disk Bock-Up System. Make perfectly running unprotected back-up copies of hundreds of 
the most popular Atari programs. Chipmunk's sophisticated programming Automatically tinds and 
REMOVES copy protection from most Atari programs. Back-up even heavily protected programs with 
eose. Finally a back-up system that needs no special hardware or skills. 
(It you need a full list of what Chipmunk copies, coil or write for our free catalog) $34.95 
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PARROT 11 

An All New Parrol sound digitizer fof youf Atari. Parrot II is a 
soptiisticoted new hardware device ttiat plugs info your joystick 
port. Parrol II tics two inputs, One for a microptione and one for o 
powered source such as a tape player, radio or CornDact Disk 
Ttie Powerful Parrot II soflwore !ets you record sounds into your computer ond ploy itiem bock on any 
Atari. Pairot II turns your computers keyboard into a musical instrument with nine different sounds 
covering three octaves each. The sounds can be anything, a dogs bark, o piano, a complete drum 
set. a symphony or your own voice. 

Parrot II lets you modify the sounds on a graphic display !o create brand new sounds and special 
efiecls. Best of all, the sounds and voices con be put into your own programs thai can be used on 
any standard Atari, Explore the world of digital sound and music. ONLY $59.95 
Pre-Recorded Sound Disk More pre-recorded sounds for Parrof $4,95 

$5.0 



MRROT II Demo Disk [Does not require Parrot to run) 

I^J^POP-N-ROCKER 



i.OO 



Sconolyzer Automatically scon & analyze commercial programs Unlock programming secrets and 
learn from the masters $29.95 

Impersonator Cartridge to Disk back up system. Create mnning bock-up copies ot any cartridge 
Lu frt (up,tol6K) $29.95 

tI3>* CHEAT 

Gel more from your gomes with CHEAT Tired of spending days trying to beat o gome? Tired o( getting 
stuck jusf when you need another life? Cheat is an innovative new product that gives you the chance 
you need to beat your favorite games. Cheat works with hundreds of Alan gomes to give you 
unlimited lives or power End the frustrotion and get hours more enjoyment from your gomes. (Call or 
write AlpliQ Systems (or our free catolog wilfi a lull list of he programs Ihal work wilh Cheat") ONIY $24.95 

BASIC TURBOCHARGER 

NOW for the first lime a BASIC programmer con gel the power, flexibility ond incredible speed of 
machine language. BASIC TURBOCfHARGER is o book and disk package that contains over 1 50 
ready to use machine language routines. Complete instructions show how to odd them to your own 
BASIC programs to get these features and more: ■ Smooth Scrolling • Player/I\^issile control • Load & 
Save Picture files ■ Sorting and Searching * Special Effects Graphics • Incredible Speed • tvluch, fwluch 
More • Over 1 50 programs. You've heard of the power of Assembler now harness it tor your own 
needs. 524 95 

216-374-7469 





fast paced, multi-player trivia game Itiot mixes questions 

with real songs (digitized 
wilh Poftot). Be the first to identify the songs and answer the music trivia questions. Pop-N~Rocker 
comes wilh three data disks and lets you add new questions so if will never get old. You con use a 
Parrot Sound digitizer to odd new songs tool Use any kind ol music from Rock to Classical to 
Nursery Rtiymes A new concept in entertainment and a pertect add-on for Pafrol. $24.95 

COMPUTEREYES & MAGNIPRINT II + 

Turn your compuler inlo a digital poitrait studio. This complete pockage lets | 

you capture, save & print digital images trom your Video Camera, VCR 

or TV COr^PUTEREYES hardware plugs directly into your joystick ports for 

easy use, Print your picture on a 6 fool poster $119.95 

ComputerEyes camera system 

Comes complete with everything obove, plus a block and white video , -- •,.-'^' 

camera and connecting coble. $329.95 IbB'/ffi.'.'JlHwB' 

Groptiics 9 Software Add a new dimension to your COMPUTEREYES GIANT WALL SIZED POSTERS. 

piclures captures images in 16 shades of grey $12.00 

Magniprint II + 

Easily the most powerful print program avoiloble today Print graphics from almost any format in 

hundreds of shapes, sizes, ond shades. Supports color printing and lets you create giant posters. 

ivlagniprini 11+ lets you stretch and squeeze, invert, odd text, adjust shoding and much more. 

Works with EPSON, NEC, Citoh, Panasonic, Gemini. Star. XiyiiyiSOl, and compatible punters. (850 

interface ot equivalent required). $24.95 

Graphics IVonsformer 

Now you can combine the most powerful features of all your graphics programs. Create print shop 

icons from a Koala pod picture, from o photo digitized with CompuferEyes, or any picture lite. 

Graphics Transformer lets you Stirink, Enlarge and Merge piclures for unequaled flexibility. $22.95 

YOUR ATARI COMES AUVE 

SAVE fytONEY Finally on altemotive to buying expensive computer add-ons. Your Atari Comes Alive 
shows you how to built them yourself. This "How-To' book and disk pockage gives you complete 
step by step instructions and programs needed to built and control these exciling devices and I^ORE: 
• Light Pen • Light & f^olor Controllers -Alarm Systems • \toice Recognition • Environmental Sensors 
•Data Decoders • More than 1 50 pages, Hbur Atari Connes Alive $24.95 



BYBXEr^S 



VISA & MASTERCABD, ORDER BY ALPHA SYSTEMS 1012 SKYUWD DRIVE MACEDONIA, OH 44056 FREE BONUS: DELUXE SPACE GAMES (3 qomes 

on disli) Froe with ony order of 3 or more ilems. Include S3,0U shp & hdig (US Canado) OHIO res. add 5 '/5% solos lox 
Foreigri orders odd S8.00 shp & hidg. Coll or wrile lor tree catalog. Customer Service Line (2 1 6) 467-5665 M-F 9-3, 



PHONE, OR SEND MONEY ORDER TO: 



CIRCLE #107 OM READER SERVICE CARD. 
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BATTLEZONE 

Atari Corp. 

1196 Borregas Avenue 
Sunnyvale, CA 94086 
(408) 745-2000 
Cartridge $19.95 

reviewed liy Howard H. Wen 

Regardless of what faults there might be 
with this game, one thing is for sure: It's a 
faithful translation of the arcade classic. Un- 
fortunately, this means that if there were 
things you didn't like about the arcade Bat- 
ilezone, you're going to find them here in this 
cartridge version for the XE Game System 
and Atari 8-bit computers. 

The scenario takes place in the near future 
when all nations of the earth have agreed to 
world peace. However, a "power-hungry rab- 
ble of military malcontents" don't really like 
the idea of living in a world without war. So 
they do what typical military malcontents 
would normally do— they send out hordes of 
robot tanks programmed to destroy the world! 
Naturally, this is where you come in. Your 
job is to destroy these tanks before they des- 
troy you, on a battlefield littered with three- 
dimensional objects— cubes, pyramids and 
rectangles. And you do this driving a slow- 
moving tank, which only shoots shells one 
at a time. 

Batllezone is played from a first-person 
perspective, appearing as if you're looking 
at the battlefield through the tank's window. 



The top part of the screen displays an infor- 
mation panel. The left side of the panel tells 
you of the existence of enemy tanks and if 
your tank's movement is being hindered by 
an object. The radar scanner is a circle in the 
middle of the panel, which shows the over- 
head, entire view of the battlefield: the 
wedge-shaped area representing the player's 
point-of-view. Enemy tanks and other 
weapons appear as blinking dots on the ra- 
dar. Finally, the right side of the information 
panel displays your score and the number of 
tanks you have remaining. 

The object of the game is to simply locate 
enemy weapons on the radar scanner, move 
in on them, zero in with your gunsight and 
blast the target to bits as soon as you see the 
gunsight narrow on it. You do this by mov- 
ing your tank around the battlefield with your 
joystick and firing shells with the joystick but- 
ton. Of course, the enemy tanks will try 
shooting back. Plus, there are three- 
dimensional shapes scattered throughout the 
field, which may be used ibr cover from ene- 
my fire, but they tend to be a nuisance by 
blocking your way. 

Besides the slower-moving, normal tanks, 
you also have to deal with more aggressive 
supertanks, which move just as fast as you 
do. And for bonus points, nonattacking sauc- 
ers move across every now and then. But the 
toughest of the enemies are the missiles that 
suddenly drop from the air and quickly zig- 
zag to collide into your tank. 

Battlezone's screen display simulates the 
three-dimensional, vector graphics of the 
original arcade version. At first it's difficult 



to identify objects. Things look especially 
confusing when an enemy tank hides behind 
a see-through obstiicle. The animation of the 
kamikaze missiles is erratic, making it ex- 
tremely hard to shoot them. A nice visual 
touch added to Battlezone occurs when your 
tank is hit with an enemy shell, the screen 
"cracks." 

The sound effects are well-done and im- 
portant to game play— sometimes more so 
than what you see on the .screen. Certain 
sounds tell whether a normal tank or super- 
tank is approaching you, warn if a missile is 
about to appear or alert that a saucer is mov- 
ing across the field. 

Veteran Atarians, who have played similar 
tank games such as Dimension X or Encoun- 
ter, may find Battlezone sluggish in move- 
ment and lacking in features. But the 
slowness of the player's tank is probably 
deliberate in oi"der to imitate a real tank. 

There are five levels to chose from on Bat- 
tlezone. On Level 1 tanks and other enemy 
weapons are easily blown away. Level 5 is the 
most challenging, even for a hard-core video 
gamer. The game itself doesn't progress from 
one level to another, but in.stead, enemy tanks 
come after you endlessly, one after another. 
The game ends only when you've lost all of 
your tanks. 

Battlezone will probably satisfy fans of the 
arcade version and the many new owners of 
the XE Game System, but Atari H-bil old- 
timers might be disappointed. Nevertheless, 
this one-player game is one of the best, pure 
shoot-'em-ups to come along for the Atari 
8-bits in a long time. |H 
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XL/XE HARDWARE 



INTERFACES 

ICD 

P:R Connection 61.99 

Printer Connection 41.99 

Supra 

1150 39.99 

1151 (1200 XL) 40.99 

Xetec 

Graphix Interface 38.99 

Atari 

850 Interface 109.00 

COMPUTERS 

CMO PACKAGE EXCLUSIVE 




Atari 800XL & XF551 
Disk Drive 

w/5 Undocumented ROMS Asteroids, 
Defender, Missile Command, QIX, Star 
Raiders S07Q 

Atari 

800XL 89.99 

130XE 139.00 

XL/XE ENHANCEMENTS 

Axlon 32K Mem. Board (400/800) .19.99 
Atari 80 Column Card 79.99 

MODEMS 

Atari 

SX212 300/1200 (ST) 89.99 

XMM301 42.99 

Anchor 

VM520 300/1200 ST Dir. Con 119.00 

Avatex 

1200 HC 89.99 

2400 159.00 

Supra 

2400 Baud XUXE or ST 169.00 

2400 Baud (no software) 149.00 

MONITORS 

lUlagnavox 

CM8505 14" Composite/RGB/TTL 199.00 



ST HARDWARE 




ATARI 520 ST FM ^_«^ 
RGB/Color System '789 

Includes: 520 ST FM with 3V2" drive, 
mouse & 1224 color monitor. 

SMI 24 Monochrome Monitor 179.00 

SMI 224 RGB Color Monitor 329.00 

Call For Current Information 
On The Entire ST Line! 



DRIVES 



Atari 

ST 314 DS/DD 219.00 

XF551 Drive (XUXE) 179.00 

SHD204 20 Meg Hard Drive 599.00 




Supra <,-.«#* 

30 Meg Hard Drive ^689 

I.e. 

51/4" 40 Track (ST) 219.00 

51/4" 80 Track (ST) 279.00 

LCD. 

FA'ST 20 Meg 629.00 

FA»ST 30 Meg 869.00 

FA'ST Dual Hard Drives Call 

Indus 

GTS 100 3V2" DS/DD (ST) 199.00 

GT 1000 51/4" DS/DD (ST) 209.00 

GT Drive (XL/XE) 189.00 

Supra 

FD-10 10MB Removable Floppy 

w/SCSI 899.00 

20 Meg Hard Drive (ST) 579.00 

20 Meg Hard Drive (XUXE) 689.00 



PRINTERS 



Atari 

1027 LQ XUXE 



.129.00 




Atari XDM1 21 ^^«^ 

LQ (XL/XE) 51 89 

XM-M8OI XUXE Dot Matrix. . . .199.00 

XM-M804 ST Dot Matrix 199.00 

XDM 121 Letter Qlty. XL/XE 209.00 

Brother 

M-1109 100 cps Dot Matrix 169.00 

M-1509 180 cps Dot Matrix 389.00 

HR-20 22 cps Daisywheel 339.00 

Citizen 

120D 120 cps Dot Matrix 149.00 

180D 180 cps Dot Matrix 179.00 

Premier-35 35 cps Daisywheel . . 549.00 
Epson 

LX-800 150 cps, 80 col 189.00 

Hi-80 4 pen plotter 269.00 

FX-850 264 cps, 80 col Call 

FX-1050 264 cps, 132 col Call 

LQ-500 180 cps, 24-wire Call 

LQ-850 330 cps, 80 col Call 

LQ-1050 330 cps, 132 col New 

NEC 

P2200 pinwriter 24-wire 379.00 

P5200 pinwriter 24-wire 599.00 

P5300 pinwriter 132 col 799.00 

Okidata 

Okimate 20 color printer 129.00 

ML-182 -1-120 cps, 80 column . .229.00 
ML-320 + 300 cps, 80 column . . 379.00 
ML-390 + 270 cps, 24-Wire 539.00 

Panasonic 

KX-P1080i 144 cps, 80 col 169.00 

KX-P1091i 194 cps, 80 col 199.00 

Star Micronics 

NX-1000 140 cps, 80 column . . .179.00 

NX-15 120 cps, 132 column 319.00 

Toshiba 

P321-SL 216 cps, 24-wire 499.00 



WE SHIP 90% 
OF ALL ORDERS 
WITHIN 24 HOURS 






SELECT FROM 
OVER 3000 
PRODUCTS 
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you want to talk to us 



XL/XE SOFTWARE 



Access 

Leaderboard Golf 13.99 

Accolade 

Hardball 19.99 

Atari 

Atariwriter Plus 35.99 

Filemanager 1 1 .99 

Music Painter 1 1 .99 




LOOSE/UNBOXED XL/XE 
ROM CARTS 

S349 ea. or 5 for $1499 

Includes: Space Invaders, Star Raiders, Missile 
Command, Asteroids, Pac Man, Galaxian, 
Defender, Qix 

Atari Program Excliange 

Misc. Programs (cassettes) at 1 .99 

Broderbund 

Graphics Library I, II, III 14.99 

Printshop 26.99 

Datasoft 

Alternate Reality (City) 23.99 

221 Baker St 20.99 

Electronic Arts 

Auto Duel 29.99 

Firebird 

Guild of Thieves 19.99 

Silicon Dreams 19.99 

Jewels of Darkness 19.99 

Microprose 

Top Gunner 16.99 

F-15 Eagle Strike 21.99 

Silent Service 22.99 

Origin Systems 

Ultima 4 36.99 

Roklyn SPECIAL 

Anti-Sub/Journey to Planet . . .(ea.) 3.99 

Strategic Simulations 

Colonial Conquest 24.99 

Gemstone Warrior 1 1 .99 

Sublogic 

Scenery Arizona 14.99 

X-Lent 

Typesetter 22.99 

Printshop Interface 21.99 



ACCESSORIES 



MD1-M SS/DD 51/4" 8.49 

MD2-DM DS/DD 5V4" 8.99 

MF-1DDM SS/DD 3Vz" 11.99 

MF2-DDM DS/DD 3V2" 18.49 

Sony 

MD1D SS/DD 51/4" 6.99 

MD2D DS/DD SVa" 7.99 

MFD-1DD SS/DD 3V2" 11.99 

MFD-2DD DS/DD 3V2" 17.99 

Allsop Disl( (Holders 

Disk File 6O-5V4" 9.99 

Disk File 30-3V2" 9.99 

Curtis 

Emerald 39.99 

Safe Strip 19.99 

Universal Printer Stand 14.99 

Tool Kit 22.99 

ICD 

BBS Express (ST) 52.99 

Sparta DOS Construction Set 28.99 

US Doubler/Sparta DOS 47.99 

Real Time Clock 48.99 

Rambo XL 29.99 

US Doubler 28.99 



ST SOFTWARE 




ACCOLADE 

Ghost $2899 

Abacus 

PC Board Designer 119.00 

Access 

Leaderboard Golf 22.99 

Activision 

Hacker II 28.99 

Antic 

CAD 3-D 29.99 

Avant Garde 

PC Ditto 59.99 

Batteries Included 

Degas Elite 37.99 



ST SOFTWARE 



Dataeast 

Speed Buggy 24.99 

Electronic Arts 

Gridiron Football/Auto Duel, (ea.) 26.99 

Isgur Portfolio 119.00 

Firebird 

Silicon Dreams 19.99 

The Sentry/Tracker (ea.) 12.99 

Infocom 

Beyond Zork 34.99 

Metacomco 

ISO Pascal 59.99 

Microprose 

Gunship 28.99 

F-15 Strike/Silent Service (ea.) . . .24.99 
Miles Software 

ST Wars 24.99 

Mindscape 

Road Runner 36.99 

Mark of the Unicorn 

PC Intercom 79.99 

Mark Williams 

C 119.00 

Paradox 

Wanderer (3D) 24.99 

Progressive Computer 

Graphic Artist 1.5 11 9.00 

Psygnosis 

Barbarian/Deep Space (ea.) 25.99 

Soft Logik Corp. 

Publishing Partner 54.99 

Strategic Simulations 

Questron II 37.99 

Sublogic 

Flight Simulator II 33.99 

Timeworks 

Swiftcalc/Wordwriter (ea.) 45.99 

Partner ST 29.99 





rUHLISHUR ^^^^H 
r. ' ^^M 1 



TIMEWORKS ^-.^„« 

Desktop Publisher '/S®^ 

Word Perfect Corp 

Word Perfect 4.1 179.00 



In the U.S.A. and in Canada 



Call toll-free: 1-800-233-8950 



Outside tlie U.S.A. call 717-327-9575, Fax 717-327-1217 
Educational, Governmental and Corporate Organizations call toll-free 1-800-221-4283 
CMO, 101 Reighard Ave., Dept. B7, Wiliiamsport, PA 17701 



MMC 



MICROCOMPUTER 
MARKETING COUNCIL 



OVER 350.000 SATISFIED CUSTOMERS • ALL MAJOR CREDIT CARDS ACCEPTED • CREDIT CARDS ARE NOT CHARGED UNTIL WE SHIP 



POLICY: Add 3% (minimum $7.00) sliipping and handiing. Larger shipments may require additional charges. Personai and company checi<s require 3 weel<s to clear. 
For faster deiivery, use your credit card or send cashier's checl< or bani< money order. Credit cards are not charged until we ship. Pennsylvania residents add 6% sales 
tax. Ali prices are U.S.A. prices and are subject to change, and aii items are subject to availability. Defective software wiii be replaced with the same item only. Hardware 
wiii be replaced or repaired at our discretion within the terms and limits of the manufacturer's warranty. We cannot guarantee compatibility. All sales are final and returned 
shipments are subject to a restocl<lng fee. We are not responsible for typographic or photographic errors. 
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